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Preface 



This publication provides a detailed description of the 
IBM 7090/7094 Generalized Sorting System (Sort). 
Chapter 1 describes the characteristics, features, and 
capabilities of the system. Chapter 2 describes the 
structure of Sort. This chapter includes the four main 
phases of Sort, some operational procedures, and a 
system flow chart. Control cards for operating under 
the iBSYs System Monitor and control cards for the 
actual sorting procedures are described in Chapter 3. 
Chapter 4 contains a listing of the subprograms loaded 
during each phase of Sort and a discussion of subpro- 
gram loading procedures. 

The structure of Sort files and records is explained in 
Chapter 5. Chapter 6 covers exits in the Sort which 
are available for user modification subroutines. Flow 
diagrams are presented with the text to assist in the 
utilization of this information. In Chapter 7, operator 
and programmer messages are listed and explained, 
and appropriate operator action is indicated. Chapter 
8 lists the core-storage locations that are allotted to the 
COMMON parameter entries. In Chapter 9, procedures 
for updating, editing, and modifying the 7090/7094 
Sorting System are described. 

It is assumed that the reader has a basic understand- 
ing of the IBM 7090 or 7094 Data Processing System, 
especially in relation to input/output devices and mag- 
netic tape records. No knowledge of symbolic pro- 
gramming is required to execute Sort except when it is 
desired to introduce program modifications. 

The reader may find the following ibm publications 
useful: 

IBM 7090/7094 IBSYS Operating System: System 
Monitor (IBSYS), Form C28-6248 

IBM 7090/7094 IBSYS Operating System: Input/ 
Output Control System, Form C28-6345 

IBM 7090/7094 Programming Systems: FORTRAN 
II Assembly Program (FAP), Form C28-6235 

IBM Standard Tape Label, Form C28-8142 

The minimum machine requirements needed by 
Sort are given below. All references to magnetic tape 
units apply to both 729 Magnetic Tape Units and 7340 
Hyper tape Drives. 

An IBM 7090/7094 (including 7094 II) Data Process- 
ing System with an ibm 7302 or 7302-1 Core Stor- 
age Unit (32K). 



A 729 Magnetic Tape Unit, 7340 Hypertape Drive, 
1301 Disk or 7320 Drum Storage as the system 
library unit. 

A system input unit (sysini), which may be a mag- 
netic tape unit or an on-line card reader. 

A magnetic tape unit for each file of information to 
be sorted or merged. A file may be contained on 
more than one reel of magnetic tape. 

At least four magnetic tape units, divided equally 
between any two channels. 

An optional system output unit (sysoui) for off-line 
messages and unreadable records. It must be a 
magnetic tape unit. 

An optional system checkpoint unit (sysck2) for 
checkpoints, dictionaries, and unreadable records 
(if SYSoui is not used). 

An on-line printer. 

This information is summarized in the following 
table: 



SYSTEM UNIT 
FUNCTION 


REQUIRED 


CAN BE ] 


729 


7340 


1301 


7320 


711 


716 


System Library 
Unit (SYSLBl) 


Yes 


X 


X 


X 


X 






System Checkpoint 
Unit(SYSCK2) 


Optional 


X 


X 










System Input 
Unit (SYSINI) 


Yes 


X 


X 






X 




System Output 
Unit (SYSOUI) 


Optional 


X 


X 










System Peripheral 
Punch (SYSPPl) 


No 














System Card 
Reader 
(SYSCRD) 


Optional 














System Printer 
(SYSPRT) 


Yes 












X 


At least four 
tape units 


* 


X 


X 










System Utility Unit 1 
(SYSUTl) 


e* 


X 


X 










System Utility Unit 2 
(SYSUT2) 


«« 


X 


X 










System Utility Unit 3 
(SYSUT3) 


«« 


X 


X 










System Utility Unit 4 
(SYSUT4) 


«« 


X 


X 











* At least two tape units on each of two chaimels. 
** May be used as any of the four required tape units if speci- 
fied by Sort control cards. 



This publication. Form C28-6365-1, is a reprint of Form C28- 
6365-0 incorporating changes released in Technical Newsletter 
N28-0110. The original publication and the newsletter are not 
obsolete. 



Copies of this and other ibm publications can be obtained through ibm Branch OflBces. 

Address comments concerning the contents of this publication to: 

IBM Corporation, Programming Systems Publications, Dept. D91, PO Box 390, Poughkeepsie, N. Y. 12602 
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The IBM 7090/7094 Generalized Sorting System (Sort) 
is a multiphase program designed to offer the user 
flexibility in processing files. Sort accepts, as input to 
be sorted, either fixed-length or variable-length records 
written in either binary or decimal mode. The control 
fields of the records may be signed or unsigned and 
may be sorted in ascending or descending order using 
either the scientific collating sequence or the commer- 
cial collating sequence. The records may be sorted on 
up to 200 control fields. The combined lengths of these 
contiol fields may be up to 2,000 words long (the maxi- 
mum size of a logical record or tape record allowed by 
the program). Input files must be on either 729 or 7340 
magnetic tapes. The tapes are rewound by the Sort 
system before being read. 

The 7090/7094 Sort is designed to operate under the 
IBSYS Operating System, which controls the availability 
of ail input/output devices. The parts of ibsys used by 
Sort are ibnuc and ioex; Sort provides its own read/ 
write routines and buffering schemes. 

System Capabilities 

The 7090/7094 Generalized Sorting System enables the 
user to: 

1. Sort or merge records on 729 Magnetic Tape 
Units or 7340 Hypertape Drives or on a combination 
of these. 

2. Accept files written in either binary or decimal 
mode. 

3. Sort or merge fixed-length or variable-length data 
records, which may be either blocked or unblocked. 

4. Perform up to an eight- way merge if the ibsys 
Availability Table is large enough. Maximum Sort 
capacity is seven full reels of blocked data on tape, 
written in 800 cpi density if 729 tapes are used during 
Merge Phase. (A full reel of 729 tape is assumed to be 
2,300 feet long between beginning-of-tape and end-of- 
tape markers. A full reel of 7340 Hypertape is assumed 
to be 1,700 feet long. The number of data records on 
each full reel defends '^n th*^ Inrriool i-orx^vrl lonnrfii i-Vio 
blocking factor, and the tape density. Sort capacity is 
determined by the type of tape units being used for 
merging. If these are mixed 729 and 7340 units, the 
capacity is based on that of a 729 unit.) 

5. Sort and/or merge signed or unsigned control 
fields in ascending or descending order. 

6. Sort and/or merge in commercial or scientific 
collating sequence. 



7. Merge previously sorted data with a current sort 



run. 



8. Insert modification subroutines at specified entiy 
points. 

9. Perform a merge operation. 



System Characteristics 

The 7090/7094 Sort system is composed of separate 
subprograms (modules), supplied as a series of blocked 
card images on the ibsys system tape. The subprograms 
are assembled in relocatable form so that only those 
subprograms needed for a particular Sort run are 
loaded from the system unit at the time each phase of 
the Sort is loaded. 

The Edit Phase of Sort determines from contiol card 
parameters which subprograms are required for a 
given run. The control cards are fully described in 
Chapter 3. 

The modular structure of Sort allows the user flexi- 
bility in intioducing routines into the Sort system to 
permit such operations as summarization, deletion, 
lengthening, and shortening of records. These routines 
can be located on any of the sysuni tapes or in the card 
reader, and are loaded and handled in the same man- 
ner as the subprograms supplied with the 7090/7094 
Sort System. 

The Merge Program 

A complete merge program is incorporated in Sort, 
making a separate merge program unnecessary. When 
a merge run is executed, only the Final Merge Phase 
subroutines are used. This program is also used during 
a sort run to complete the merging of stiings of records. 
A stiing is a group of logical records in either ascend- 
ing or descending order. In a sort-and-merge run, it is 
possible to merge previously sorted records with rec- 
ords currently being sorted, 

Input/Output Units 

For merging. Sort requires 2M tapes, where M is the 
order of merge. The tape units may be all 729, all 7340, 
or half 729 and half 7340 units, but they must be 
evenly divided between two channels. The order of 
merge, that is, number of files that can be combined 
to form a single file during the merge program, is de- 
termined by the user, usually on the basis of tape unit 
availability. An increase in the order of merge is ad- 
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vantageous when it saves time by reducing the number 
of merge passes necessary to complete the sort. The 
maximum order of merge allowed by Sort is eight. 

An additional tape unit is required if the Sort sys- 
tem is on tape rather than disk or drum storage. If the 
control cards are on tape, another tape unit is required. 
Otherwise, control cards can be read from the on-line 
card reader. Sort always reads control cards from the 
unit attached as sysini. 

Checkpoint records give the status of core storage at 
a given point during the execution of Sort. These rec- 
ords are written on the unit attached as sysck2 unless 
either the nockpt option is specified on the option 
control card or there is no tape attached as the sysck2 
function. If 9pac dictionaries are present, they are 
saved on sysck2 if it is attached. Otherwise, the dic- 
tionaries are not saved. 

Unreadable records that cannot be processed by 
Sort are normally saved on the sysoui unit if one is 
attached. If the nof option is specified, unreadable 
records are saved in the fourth file of the sysck2 unit, 
if attached. 



Initiafing the Sort System 

The Sort system occupies two consecutive files on the 
IBSYS system unit. If this unit is a tape device, the Sort 
system uses its own loader to load the relocatable sub- 
programs. If the IBSYS system unit is a disk or drum, the 
IBSYS System Loader, sysldr, is used for loading. 

If the IBSYS System Monitor control cards are on a 
tape unit attached as sysini, sense switch 1 must be up 
when the system run is started. If the control cards for 
IBSYS are in the card reader, sense switch 1 must be 
down at the start and left down until the ibsys System 
Monitor begins reading control cards from the card 
reader. If the Sort control cards are in the card reader, 
the card reader must be attached as sysini. If the cards 
are on tape, the tape unit must be attached as sysini. 

If the IBSYS system is on tape unit Al, clear core 
storage and press the Load Tape button to start the 
system. If ibsys is on any other unit — whether tape, 
disk, or drum — place a start card in the card reader, 
clear core storage, and press the Load Card button. 



Optional Program Features 

The following options, which may be specified on Sort 
control cards, are available to the user during execu- 
tion of a sort and/or merge run. For further informa- 
tion, see "sort Control Cards." 

The CKSUMS Option: If specified, a 36-bit logical 
check sum is computed for each logical record during 
a sort run. The contents of all words in the record, in- 



cluding the record-sequence word when it is used (see 
"The EQUALS Option"), are logically added. The sum is 
placed in a word that follows either the record-se- 
quence word if it is requested or the last word of the 
logical record if the records are fixed-length. For vari- 
able-length records, the check sum is placed in the 
word immediately preceding the record control word 
(the first word of the logical record). The check-sum 
word is retained during the entire sort and checked 
each time the record is read into core storage. How- 
ever, it is deleted before the final output is written. 
The CKSUMS option cannot be used with a merge run 
or with a combined sort-and-merge run. 

The EQUALS Option: If this option is specified, 
logical records having identical control fields (on which 
the records are sorted) are written on the output files 
in the order in which they appeared on the input file. 
Sort does this by appending a record-sequence word 
to each logical record. The record-sequence word fol- 
lows the last word of a fixed-length logical record but 
precedes a variable-length record, including the check- 
sum word if one is present. The record-sequence word 
is retained during the entire sort but deleted before the 
final output is written. The equals option cannot be 
used with a merge run or with a combined sort-and- 
merge run. 

The VARIABLE BLOCKING Option: If this is 
specified, short input tape blocks are accepted by the 
fixed-length portion of the program if their length is a 
multiple of the length of the logical input record. 

The NOCKPT Option: When specified by this op- 
tion, checkpoint records, which are normally written 
by Sort, are not written, even though a unit is attached 

as SYSCK2. 

The BUFFER Option: Normally, fixed-length rec- 
ords are read into core storage by a "scatter-read" proc- 
ess. This option causes records to be read into buflFers 
instead, thereby providing access to the records for 
modification. 

The RELCOM Option: The area reserved for the 
COMMON parameters of the program is usually placed 
in upper core storage, leaving space only for the ioex 
ofiF-line message writer, spout. This option provides for 
relocating the common area downward so the user can 
have space between the common area of Sort and 
spout (for example, for location of his installation ac- 
counting routine). 

The DELETE Option: If this option is taken by in- 
cluding one or more delete control cards. Sort deletes 
from the file any record containing the information 
specified on the delete control card(s). 

The TAPES Option: When this option is specified, 
the table of tape units to be used is printed on-line, 
and the system pauses for the operator to ready the 



tapes. The tape table is always printed off-line unless 
the NOF option is specified. 

The MAPS Option: The loading locations of the re- 
locatable programs used during a sort and/or merge 
run are printed on-line if this option is specified. How- 
ever, unless the nof option is taken, they are always 
printed off-Hne, regardless of the maps option. 

The CARDS Option: Columns 7-72 of the Sort con- 
trol cards are printed on-line if this option is taken. Un- 
less the NOF option is specified the contents of these 
columns are always printed off-line, regardless of the 
CAEDS option. 

The HISTORY Option: Calculated parameters, 
counts of the number of records sorted during each 
pass, and messages regarding the progress of the pro- 
gram are printed on-line when this option is taken. 
Unless the nof option is specified these messages al- 
ways appear off-line, regardless of the history option. 

The NOF Option: If a tape unit is assigned as 
SYSOui, all messages are written on this unit, whether 
or not they also appear on-line. Writing on sysoui is 
suppressed either by specifying the nof option or by 
not attaching a tape unit as sysoui. Unreadable records 
are normally written on sysoui. If they cannot be 
written there because of the nof option or because the 
unit is not attached, they are written in the fourth file 
of SYSCK2 if it is attached. 



Collating Sequences 

Sort permits the use of either the scientific or commer- 
cial collating sequence. 

In Table I, column one shows the characters of the 
scientific sequence in ascending order. Beside each 
character, in column two, is its octal representation in 
core storage. Column three shows the characters of the 
commercial sequence in ascending order. For the com- 
mercial sequence, the octal representation in column 
two is used for sorting. For example, if the characters 
to be compared are 4 and K, the comparison in the 
scientific sequence would be between 04 and 42. If the 
commercial collating sequence had been requested, 
the comparison would be between 56 and 31. 

If descending order is requested, the sorting equiva- 
lent in the table is complemented. Thus, for the 
example using 4 and K, the comparison would be 
between 73 and 35 if the scientific sequence were 
requested, and between 21 and 46 if the commercial 
sequence were requested. 

The table used for the conversion when the com- 
mercial collating sequence is requested appears in the 
XTRACT subprogram beginning at symbolic location 
TABLE and occupies 64 locations. The first two octal 
digits of each word contain the sorting equivalent of 



the commercial sequence characters in the scientific 
sequence order. For example, the twentieth character 
in the scientific sequence is C. The twentieth entry in 
TABLE (in the xtract subprogram) has 20 in the first 
two octal digits. Therefore, 20 is the sorting equivalent 
of C in ttie commercial sequence order. The conversion 
table in xtract may be changed if it is desired to alter 
permanently the sequence that results whenever the 
commercial collating sequence is requested. 

Table I: Sorting Equivalents for Scientific and 
Commercial Sequences 



SCIENTIFIC 


SORTING 


COMMERCIAL 


SEQUENCE 


EQTJIVALENT 


SEQUENCE 





00 


Blank 


1 


01 




2 


02 


)orn 


3 


03 


^ 


4 


04 


& 


5 


05 


$ 


6 


06 


# 


7 


07 


— 


8 


10 


/ 


9 


11 


, 


None 


12 


% or ( 


# 


13 


# 


@ 


14 


@ 


None 


15 


+0 


None 


16 


A 


None 


17 


B 


& 


20 


G 


A 


21 


D 


B 


22 


E 


G 


23 


F 


D 


24 


G 


E 


25 


H 


F 


26 


I 


G 


27 


-0 


H 


30 


J 


I 


31 


K 


+0 


32 


L 




33 


M 


) 


34 


N 


None 


35 





None 


36 


P 


* 


37 


Q 


— 


40 


R 


T 
J 


41 


=1= 


K 


42 


S 


L 


43 


T 


M 


44 


U 


N 


45 


V 


O 


46 


w 


P 


47 


X 


Q 


50 


Y 


R 


51 


z 


-0 


52 





$ 


53 


1 


« 


54 


2 


None 


55 


3 


None 


56 


4 


None 


57 


5 


Blank 


60 


6 


/ 


61 


7 


S 


62 


8 


T 


63 


9 


U 


64 


None 


V 


65 


None 


w 


66 


None 


X 


67 


None 
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Table I: Sorting Equivalents for Scientific and 
Commercial Sequences ( Cont.) 



SCIENTIFIC 


SORTING 


COMMERCIAL 


SEQUENCE 


EQUIVALENT 


SEQUENCE 


Y 


70 


None 


z 


71 


None 


4= 


72 


None 




73 


None 


( 


74 


None 


None 


75 


None 


None 


76 


None 


None 


77 


None 



2. If the sort is in ascending order and the sign is 
minus, the whole field is complemented. Thus, 10101 
becomes 01010. 

3. If the sort is in descending order and the sign is 
plus, the field, except for the sign bit, is complemented. 
Thus, 00101 becomes 01010. 

4. If the sort is in descending order and the sign is 
minus, the field is unchanged. Thus, 10101 remains 
10101. 



Algebraic Sort 

An algebraic sort should only be used with a scientific 
collating sequence. When an algebraic sort is re- 
quested, the sign bit must be considered, as well as 
whether the sort is to be in ascending or descending 
order. To sort the algebraic control fields properly, 
XTRA.CT does the following: 

1. If the sort is in ascending order and the sign is 
plus, the sign is changed. Thus, for example, the bits 
00101 become 10101. 



Logical Sort 

A logical sort may use either the scientific or commer- 
cial collating sequence. If the commercial collating se- 
quence is specified, the length of each field must be 
a multiple of six bits. Records are sorted as defined by 
the collating sequence charts (Table I) without ad- 
justment for signs of numeric fields. 

Figure 1 presents a very general picture of the 
XTRA.CT routine. It is a graphical illustration of the ma- 
terial described in the preceding paragraphs. 




Ale 




Descending 



Ascending 




Sign 
Pk 



Minus 



Sign 




Minus 



Desc. 



Complement 
Entire Word 



Pius 



Complement 

Entire Word 

Except Sign Bit 



Complement 
Entire Word 



Change 
Sign 



Figure 1. XTRACT Routine 
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Structure Or 7090/7094 Sort 



Sort is divided into four distinct phases: the Edit 
Phase, the Internal Sort Phase, the Merge Phase, and 
the Final Merge Phase. 

The system also contains the Sort Monitor and the 
Postprocessor. The Sort Monitor communicates with 
IBSYS and maintains phase-to-phase control over the 
runnmg Oi the program. Sort ivlonitor initializes the 
Sort system by loading Edit Phase, which reads all con- 
trol cards up through the card following the end card 
of a given Sort run. After the Postprocessor prints out 
information on the completed Sort run, the last control 
card previously read (i.e., the card following the end 



IBSYS Monitor 
$EXECUTE SORT 



card) is analyzed and the action taken is determined as 
follows: 

If this card is any of the following. Sort Monitor re- 
loads Edit Phase and retains control. 

1 16 



$EXECUTE 



SORT 



$ID 
^ $PAUSE 
' any Sort control card 

If the next control card after the end card is any of 
the following, Sort Monitor returns control to the ibsys 
System Monitor and does not reload Edit Phase, 



Sort Monitor 



Edit Phase 




Return to 
IBSYS 
System 
Monitor 



Yes 



Edit 

Phase 

Functions 



Sort Monitor 




Internal 

Sort 

Phase 




Yes 



Sort 
Monitor 



Merge 
Phase 



Final Merge 
Phase 



No 



Sort 
Monitor 



No 




Figure 2. Flow of Control for 7090/7094 Sort System 
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16 



^ $EXECUTIVE 



$JOB 



anything but SORT 



$IBSYS 



/$STOP 

I£ the card following the end card is none of the 
eight given in the preceding text, Sort Monitor reloads 
Edit Phase which prints the following error message: 
NOT A SORT CONTROL CARD 



F/ow of Confrof 

Figure 2 shows the system flow of control for the 
7090/7094 Generahzed Sorting System. 

£c/if ?\\ctse 

The Edit Phase is the first phase of Sort. It is called by 
the Sort Monitor and performs the following functions : 
Card Analysis: During Edit Phase, the control cards 
are loaded into core storage and the parameters are 
analyzed. Card analysis consists of the following: 

1. Control cards are checked for invalid characters. 

2. Control cards are checked to verify that all re- 
quired parameters are supplied to the system and that 
no invalid parameters are given. Given parameters are 
also checked for the proper format. 

3. Messages are printed on the on-line printer to 
inform operator of errors or possible errors in control 
cards. 

4. After being checked, the information is placed in 
relocatable common tables. 

Building Program Lists: Edit Phase determines 
which subprograms on the system tape will be re- 
quired in subsequent phases. The names of these 
programs are placed in program lists for the Internal 
Sort, Merge, and Final Merge Phases. These program 
lists are used by the Sort Monitor to load the necessary 
subprograms for each phase. 

Calculating Internal Parameters: The internal pa- 
rameters used by the other three phases are calculated 
by the Edit Phase and placed into relocatable tables 
(the COMMON area) for later use. 



Internal Sort Phase 

The Internal Sort Phase is a one-pass phase. Its func- 
tion is to arrange input records in sequenced strings 
(which are groups of logical records appearing in an 
order according to specified control fields and may be 
one or several output blocks long). Each output block 
is as large as can be accommodated by the Merge 
Phase. The output of Internal Sort Phase is divided 
among the number of tapes represented by the order 



of merge (which is equal to the number of files that 
can be combined into a consolidated file during a 
merge operation). 

This phase produces sequenced strings by a modified 
continuous merge process. Records are read into a 
Record Storage Area and are sorted in this area. A 
smaller number of additional records are then read 
into an auxiliary area and are there sorted and merged 
with the records in the Record Storage Area. A num- 
ber of records equal to the number of sorted records 
is then selected and written as output. For a sort of 
fixed-length records, an equal number of records is 
simultaneously read in to continue the process. For a 
sort of variable-length records, additional records to 
be sorted are read into the core-storage space made 
available as a result of records being written out. The 
number of records read in varies with the record size. 

Unless the buffer option is requested, fixed-length 
records are read into the Record Storage Area by a 
"scatter-read" procedure and are not moved during 
the internal sort processing. Instead, sorting and 
merging are done using tag (or pointer) tables. When 
selected for output after sorting and merging, the 
records are written by a "scatter-write" procedure. 
Variable-length records, and fixed-length records if the 
BUFFER option is specified, are read in by a "buffer- 
read" procedure. By this method, each logical record 
is moved from the input buffer to the Record Storage 
Area. There, processing is performed in a manner sim- 
ilar to that used with a "scatter-read" procedure. 

The selection of records to be written is made in 
such a way as to produce the longest possible strings. 
The method used by Internal Sort Phase takes advan- 
tage of any sequences already existing in the file to 
produce unusually long strings. For random records, 
strings containing about twice the number of records 
contained in the Record Storage Area can be obtained. 
Since the number of strings formed in a given file 
varies inversely with the length of the strings, longer 
strings reduce the number of merge passes necessary 
to complete the sort. 



Merge Phase 

During the Merge Phase, the sequenced strings gen- 
erated by the Internal Sort Phase are merged in suc- 
ceeding passes until the number of strings is no 
greater than the merge order. If the number of strings 
produced by the Internal Sort Phase is not initially 
greater than the merge order, the Merge Phase is by- 
passed. 

Sort uses the balanced merge technique, with half 
of the merge tapes on one channel and half on the 
other. Available core storage is divided into 2M + 3 
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merge areas (where M is the merge order), each area 
being large enough to contain one merge block. Merge 
blocks are read into these areas, and the records are 
written from these areas as they are merged. After all 
records have been written out from an area, another 
block of records may be read into tue area. 

To initialize this phase, one merge block is read into 
a merge area from each of the tapes on the first merge 
channel. After these blocks have been read, merging 
begins. At the same time, another block is read from 
each tape. When enough records have been merged 
to produce one merge block, the block is written as 
merging continues. 

The records from the first string on each merge tape 
produced by Internal Sort Phase are written as one 
string on a tape on the second merge channel after 
the records have been merged. Then the records in 
the second string on each merge tape are merged and 
written on another tape on the second merge channel. 
This process continues until all records have passed 
through the merge. If any merge tape now contains 
more than one string, another merge pass follows. 
When none of the merge tapes contains more than one 
string, the phase ends. 

The Merge Phase is designed to handle any merge 
order from two through eight. A large order of merge 
may reduce the number of passes required for the sort, 
thus reducing total execution time of the run. How- 
ever, since the Merge Phase must handle 2M + 3 
blocks at once, the size of the merge block may be 
smaller for a large merge order than for a small one. 
This causes more interrecord gaps on the merge tapes 
and slower input/output operations. 

Final Merge Phase 

During the Final Merge Phase, the strings produced 
by the Merge Phase, or by the Internal Sort Phase if 
the Merge Phase is bypassed, are merged. Merging 
occurs in the manner described for the Merge Phase. 
The strings are written in the format specified by the 
output FILE card (see "sort Control Cards"). 

In this phase, 2M + 2 areas are used for reading, 
and two output buflFers, each the size of an output 
block, are used alternately for writing. 

During a sort-and-merge run, the external files are 
merged with the sorted file by this phase. In a straight 
merge run, this phase follows Edit Phase; the Internal 
Sort and Merge Phases are omitted. 



Checkpoint and Restart Procedure 

Unless the nockpt option is specified on the option 
card, checkpoints are written at the following points 
during execution of a Sort run: 

1. After each reel of input of the Internal Sort Phase 

2. At the end of the Internal Sort Phase 

3. After each pass of the Merge Phase 

4. After each reel of output of the Final Merge Phase 
When a checkpoint is taken, core storage is saved by- 
being written on the checkpoint tape (sysck2). 

To restart the Sort run, the following control cards 
are necessary: 

17 16 



/■ 



$EXECUTE 



SORT 



RESTART 



END 
The Edit Phase of 7090 Sort reads the restart card 
and transfers control to the hystar subprogram, which 
initiates the restart procedure, syscks, the checkpoint 
tape, is positioned; the checkpoint file is read into core 
storage; core storage is restored; and the tapes are re- 
positioned. 



Deblock and Dump 

Unreadable records, which cannot be processed by 
Sort, may be written out for examination by the user. If 
the NOF option has not been specified on the option 
card, these records are written on sysoui if it is at- 
tached. Specifying the nof option causes placement 
of these records in the fourth file of sysck2 if it is at- 
tached. If neither sysoui nor sysck2 is attached, un- 
readable records are not written. 

If the Sort run is to be deleted when an unreadable 
record occurs, the unrdblk option must be specified on 
the OPTION control card. 

The format for the dumped records is determined 
by the mode specified on the input file card. If binary 
mode is specified, the record is written in octal format, 
12 digits per word, with blanks separating the words. 
If decimal mode is specified, the record is written in 
decimal format, six characters per word, with blanks 
separating the words. If the octal character 72 (repre- 
senting a record mark) is encountered when dumping 
decimal records, it is replaced by an equals (=) sign. 
The invalid octal characters, 15, 16, 17, 35, 36, 37, 55, 
56, 57, 75, 76, and 77, are replaced by an asterisk (*). 
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Chapter 3. Control Cards 



IBSYS System Monitor Control Cards 

The Generalized Sorting System recognizes six ibsys 
System Monitor control cards. If Sort reads a card 
which is neither one of these six System Monitor cards 
nor a Sort control card it prints the message not a 
SORT CONTROL CARD. Options are then given either to 
ignore the card and continue or to delete the Sort. 

When Sort reads one of the six valid System Monitor 
control cards, it takes the appropriate action, as indi- 
cated after each card below: 



1 



16 



(/$EXECUTE SORT 

This card calls Sort and causes control to be transferred from 
the IBSYS System Monitor to the Sort Monitor. If this card is 
read by Sort, the Sort Monitor retains control and Sort reads the 
next card from the system input unit (SYSINl). 

1 16 

j/$EXECUTE sysnam 

If this card is read by Sort and the variable field entry sysnam 
(the identification or name of a system in the System Position 
Table) is anything but SORT, control is returned to the IBSYS 
System Monitor for execution of sysnam. 

1 

5IBSYS 

When Sort reads this card, it returns control to the IBSYS 
System Monitor. 

1 



^ 



f^^W 



Upon reading a $ID card, Sort transfers control to the instal- 
lation accounting routine. 

1 

/ $STOP 

This card causes all processing to stop. 

1 

j/$JOB 

This card causes Sort to return control to the IBSYS System 
Monitor. 

If the Sort system cannot proceed to completion and 
is deleted, all subsequent Sort runs will be automati- 
cally deleted until a $job card is processed. 



SORT Control Cards 

For a file to be sorted, certain information must be 
supplied to the Sort system. This includes a description 
of the logical records, the input and output files, and 
the control fields on which the records are to be sorted. 
Other information dealing with options, labels, and 
modifications may also be needed. Information con- 
tained in columns 7-72 of the following thirteen con- 
trol cards provides complete control of the Sort system. 



CARD 


DESCRIPTION 


FILE 


Defines file characteristics. 


SORT 


Defines the sort. 


RECORD 


Defines logical record(s). 


MERGE 


Defines the merge. 


CHANNELS 


Specifies the input, merge, and outpui 




channels. 


LABEL 


Specifies nonstandard labels. 


OPTION 


Lists the options desired. 


MODIFICATION 


Specifies the names of modification pro- 




grams. 


DELETE 


Specifies records to be deleted from a file. 


OVERFLOW 


Skips initial records. 


RESTART 


Initiates restart procedure. 


REMARK 


Causes remarks to be printed. 


END 


Indicates end of control card deck. 



In a normal Sort run (one with no options or unusual 
conditions specified), only the file, sort, channels, 
RECORD, and end cards are needed. 

The order of the fields on a Sort control card is not 
critical provided the first field on the card is the card 
name or identifier. 

Control Card Notations 

Certain special characters and specified formats are 
used either to define or to separate fields or subfields. 

1. When Sort reads a control card, only the first 
three bcd characters of any field are meaningful to the 
program. Any additional characters before the next 
slash or comma are interpreted as comments. The name 
(or first three characters) of each field is its field 
definer. 

Examples 

SORT need only be SOR. 

MOD effects the same action as MODIFICATION. 

2. The slash (/) follows all field definer s associated 
with a parameter. 

3. Parentheses ( ) are used when more than one pa- 
rameter is needed for a field definer. The left paren- 
thesis follows the slash, and the right parenthesis is 
used when the end of the parameters is reached. 

4. The comma (,) is used in any of the following 
three ways: 

a. To separate one field definer and its parameters 
from another field definer and its parameters 

b. To separate one parameter from another when 
they are enclosed within parentheses 

c. To separate the name of the card from the de- 
finers and parameters on the card 

5. An X in column 6 is used to indicate a continua- 
tion of the control card. This card must immediately 
follow the control card which it continues. 
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When a control card and any related continuation 
cards are scanned, the information beginning in col- 
umn 7 of each continuation card is interpreted as a 
continuation of the preceding card. It is not necessary 
that the first 72 columns of a card be completely used 

uKj-±\jjLK::f a. C\^Ilt±riiia.Lj.v/j.i Cdi^a IS Q>Tilij±\jyQ\j.y 1101* IS it aC* 

quired that a given field be completed before column 

73 is reached. The text of a continuation card may 

begin anywhere after column 6 and before column 73. 

Specification of field parameter lengths following the 

NAME or INDENT fields (sce FILE, LABEL, and DELETE 

cards) may require use of a continuation card. In these 
instances, clie mj.ormai.ion Deginning m column < ot me 
continuation card follows that in column 72 of the 
previous card. 

6. Material given in brackets [] represents an op- 
tional field, which may be either specified or omitted 
as desired. If the field is not specified, either the stand- 
ard option, which is underlined, is taken or, if no 
option is underlined, the field itself is not being used. 

7. Braces (} define material requiring the user to 
make a choice if the associated field is used. 

8. Upper-case letters or words must appear in the 
form specified when they are used. 

9. Lower-case letters or words represent generalized 
quantities whose particular value must be specified by 
the user if the associated field is used. 

It is not necessary that control statements (i.e., a 
control card and its continuation cards, if any) be ar- 
ranged in any specific order. The only restriction is 
that the end card must be the last control card. 

For each sort and/or merge run, the number of times 
each control card may be used is given below. Each 
control card may use one or more continuation cards. 



CONTROL CARD 

RESTART 

SORT 

MERGE 

RECORD 

OPTION 

LABEL 

OVERFLOW 

CHANNELS 

END 

FILE 

MODIFICATION 

DELETE 

REMARK 



NUMBER OF TIMES PERMITTED 
1 
1 
1 
1 
1 
1 
1 
1 
1 

9 
50 
100 
Any number 



Input FILE Card 

The input file card describes the physical character- 
istics and organization of an input data file. One input 
file card is required for a sort run. For a merge run 
or a sort-and-merge run, one input file card is re- 
quired for each input file. 

The complete input file card has the following 
format: 



FILE, INPUT/n, BLOCKSIZE/n 




i r . MODE/ i^l X, DENSITY/ !l-^l T, CKSUMS"! 
L' ^ B i JL' < L 5 JL J 



,BLKSEQ 1 ,CKPT/ j ^ [1 



i 



. DICTIONARY 



i^'l'iU 



, LABEL/ j ^ jn^n TsERIAL/n 



, RLSEQ/n 1 T NAME/nHxx . . . x„ 1 | 

The fields of the input file card are defined as 
follows : 

,INPUT/n 

This field defines the card as an input FILE card, where n 
is a number whose maximum length is four digits. This num- 
ber is assigned to the input file and used wherever this file is 
referenced, such as on the SORT card. 

,BLOCKSIZE/n 

For fixed-length records, n is the number of words in an input 
block. The number n must be a multiple of the input record 
length and does not include the check-sum block-sequence word. 

For variable-length records, n is the number of words in the 
largest block of input records. If a block longer than n but not 
longer than 2,000 words is read, a message is printed and the 
block is accepted. 



, REELS/ j n 



The number of reels in the file is designated by n. If the file 
is to be processed under label control, the letter L rather than 
a number is specified. For a one-reel file, the field may be 
omitted. 



[.MODE/ jAf] 



D indicates the file is to be read in decimal mode; B, in binary 
mode. If the input FILE card specifies a standard label, the 
mode designation in the label takes precedence over this field. 



r, DENSITY/ 






\] 



If L is specified, the 729 tape unit is set to low density. H indi- 
cates high density. For a high-density 729 file or for a 7340 
Hypertape file, the field may be omitted. If the input FILE 
card specifies a standard label; the density designation in the 
label takes precedence over this field. 



L- 



CKSUMS 



I 

J 



This field specifies that the left half of the last word of each 
tape block contains a folded check sum of the block. This check 
sum is recomputed, and, if the two values are different, a mes- 
sage is printed. The CKSUMS option is permitted only in binary 
files. 



[, blkseq] 



This field specifies that the right half of the last word of 
each tape block contains a block-sequence number. The num- 
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ber is recomputed, a comparison of the two values is made, and 
a message is printed if the values are different. This field also is 
permitted only in binary files. 



[.CKPT/j ^ [] 



A designation of S (standard) assumes checkpoint files on all 
reels except the first. If N ( nonstandard) is indicated, checkpoint 
files are assumed on all reels. In either case, the checkpoint files 
are skipped. Note that this field does not cause Sort to take 
checkpoints (see "OPTION Card"). 



, DICTIONARY [/ ] l (] 



This field specifies that the first file of the tape contains a 
9PAC Dictionary. H (for high density) or L (for low density) 
must be given only if there is no file label. If there is a label 
on the file, the label and the dictionary must be in the same 
density. 



[.LABEL.] ^([||-(]] 



If this field is specified, a label is read in the density indi- 
cated ( H for high, L for low). S indicates a standard label, which 
is checked by Sort (see "File Structure" and "Tape Record 
Format"). Nonstandard labels (N) are not checked. 

[, SERIAL/n] 

If this field is specified, the number n is compared with the 
file serial number in the label. The maximum size of n is five 
characters. A message is printed if the two numbers are not 
equal. 



[, RLSEQ/n] 



If specified, the reel-sequence number in the label is compared 
with the number n. For unequal values, a message is printed. 



r. 



NAME/nHxx 



<.l 



The n alphameric characters xx . . . Xn following the H are 
compared with the name in the label. If there are differences, 
a message is printed. For a 14-word IOCS label, n must not 
exceed 18. For a standard 20- word label, n must not exceed 
10 characters. 

The following are examples of typical input file 
cards: 



r 



f 



FIL E INPUT/263, CKSUMS, REELS/5, RLSEQ/4, 
{ DEN/L, BLO/2000, LAB/SH, DICT/H, BLK7 
\ SER/6, MODE/B, NAME/9HWAGE SORT 



FIL, CKP T/S, DENSITY/H, REE/3, MOD/B, 

[BLOCK/850, SER/6, INP/263, LAB/SH 



Output FILE Card 

Information on the output file card is used for de- 
scribing the output file characteristics. One output file 
card is required for each run. 

The complete output file card has the following 
format: 



FILE, OUTPUT, BLOCKSIZE/n [, MODE/ j -^ (1 

j[, DENSITY/ j ^ n [, PADDING/ I ^ [] 
{ [, CKSUMs] [, BLKSEq] 




, LABEL/ [j ^ n^n[, SERIAL/n 



r, RLSEQ/ j -[ ][, RETAIN/nir, NAME/nHxx . . . x„ J 
The output file card fields are defined below: 
, BLOCKSIZE/n 

For fixed-length records, n is the number of words to be writ- 
ten in an output block. The number n must be a multiple of the 
output logical record length and does not include the check- 
sum block-sequence word. 

For variable-length records, n designates the number of 
words in the longest block which is to be written. If there are 
records longer than n, they are written out singly. When n = 1, 
the output is unblocked. 



[,MODE/|f (] 



When D is specified, the output file is written in decimal 
mode. B indicates that output is in binary mode. Should this 
mode designation differ from that on the input FILE card in a 
sort and/or merge of variable-length records, the record control 
words are changed to conform to the output mode. 



[, DENSITY/ l^n 



The output is written in high density when H is specified. L 
indicates low density. The field may be omitted if output is to 
be in high density or on 7340 Hypertape. 



[. 



PADDING/ 



1l(] 



This field is used only with a sort of fixed-length records. 
It specifies padding records to be added to the logical records 
in an otherwise short tape block. Padding records are dummy 
records consisting of characters that cause the records to be in 
sequence if they be added to the output file. The number of 
logical records plus the dummy records equals the blocking 
factor (the number of logical records that fill one tape record 
or tape block). H indicates high padding records, which are 
padding records added to the end of the last tape block; L 
designates low padding records, which are padding records 
added to the beginning of the first tape block. 



[,CKSUMS1 



This field apphes only to binary-mode output. It specifies the 
writing of a folded check sum of the block in the left half 
of a word immediately after the last word of the last record 
in the block. 



[, BLKSEQ 1 



This is an option for binary mode only. If this option is speci- 
fied, a block-sequence number is written in the right half of a 
word immediately following the last word of the last record in 
the block. 
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1^ 



DICTIONARY / i^r- 



LMtUJ 



-ru^ Xi„lJ„ „£ xH „ 3 J-C^_ J ^^ r^n 

jLuc iicius ui uic iiculjjkju ccuu are ueiineu as roiiows: 



Specifying this option causes the 9PAC Dictionary indicated 
on the input FILE card to be written on the output file. If 
there is a file label, the dictionary must be written in the same 
density. In this case, density need not be designated. Note that 
a dictionary must have been specified on the input file to permit 
use of this option. 



[,LABEuj^[[|f[]] 



When this field is specified, a label is written on the output 
file in either high (H) or low (L) density as indicated. If S is 
designated, the label is the 20-word IBM standard label if the 
output is on 7340 Hypertape. If the output is on 729 tape, the 
14-word IOCS label is written unless the input file contains the 
20-word IBM standard label. In this case, the 20-word IBM 
standard label is written on the output file. The parameter N 
defines a nonstandard label and refers to the one given on the 
LABEL card, if supplied, or to the label read from the input file. 



[, SERIAL/n] 



This field specifies that file serial number n is to be put in the 
label. Serial number n may not exceed five characters. 



^ lif] 



I , RLSEQ/ 

This field specifies that the reel-sequence number in the out- 
put label begins with n or 1 and increases by 1 for each suc- 
ceeding output reel used. If the field is not specified, reel se- 
quencing begins with 1. The number n may not exceed four 
characters. If specified, this number will be used in message 
*OU0I when closing the output reels. 



[, RETAIN/n] 



The number n is put in the label field and specifies the num- 
ber of retention days for the output file. The maximum length 
of n is three digits. 

r, NAME/nHxx...x„1 

If specified, the name ( xx . . . Xn) is put in the output label. 
For 14-word labels, n must not exceed 18, and for 20-word 
labels, n must not exceed 10. 

The following are examples of typical output file 
cards: 



f F ILE, LAB/SL, BLO/1000, RET/120, DEN/H, PAD/H, 

t NAME/6HRESULT BLKSEQ, OUTPUT, SERIAL/8, 

} RLS/1, MODE/B, CKSUMSj 

1 7 [ 

f FILE, OUT, R ETAIN/63, MOD/D, DENSITY/L, 

I DICT/L, SER/, BLOCK/500, LAB/SH | 

RECORD Card 

The logical record format is defined by the record 
card. One record card is required for each run. The 
complete record card has the following format: 



['TYPE/ ]|-[] 



The records to be sorted are either fixed-length (F) or vari- 
able-length (V). 



LENGTH/ (ni 



[,.]] 



For fixed-length records, ni is the number of words in the 
input record. The number n2 is the record length (in words) 
during the Merge Phase, i.e., during the writing of the output 
from the Internal Sort Phase and the input to the Final Merge 
Phase, and na specifies the record length of the output from 
the Final Merge Phase. Numbers na and ria are not needed 
unless the record lengths are to undergo modification during 
the sort. Any extra length needed for the check-sum and equals 
words (see "option Card") is added by Sort to the lengths 
specified for this field. The number Ui must be a factor of, and 
not exceed, the input block size. The number na must be a 
factor of, and not exceed, the output block size. 

For variable-length records, ni specifies the length (in words) 
of the shortest record and n2 specifies the length of the longest 
record. An estimate of the record length occurring most fre- 
quently is indicated by na. If this parameter is omitted, it is 
assumed that the longest record occurs most frequently. The 
record length control word, i.e., the first word of the record, 
must be included in counts Ui, na, and ns. The number na must 
not e-xceed the input block size. 

It is impossible to lengthen records in the Final Merge Phase. 
If lengthening is desired, it should be done during the Internal 
Sort Phase. Shortening of records may be done during either 
the Internal Sort or the Final Merge Phase. 

.— <4jin[m]--[jf[][ii[} 

Records must be divided into fields up to and including the 
last field needed for sorting, merging, or deleting. 

To define the fields of a logical record, Ui through ni denote 
the lengths of the ist through fth fields starting with the be- 
ginning of the record. This includes the record control word for 
variable-length records. Each field length is expressed either in 
bits (B) or in characters (C). When sorting files written in 
decimal mode, the field lengths must consist of full characters 
(i.e., a multiple of six bits). If a given field is signed, indicating 
an algebraic sort, the letter S is used. A logical sort on an un- 
signed field is denoted by U. Note that C and U need not be 
specified. 

The following are examples of typical record cards: 

1 7 

/ REC, FIELD/(8BS, 3BS, 2BS, 4BS) LEN/(500), TYPE/F | 



{ REC, TYP/V, LENGTH/(200, 1200, 800), FIELD/(8BS, 



RECORD [,TYPE/ IyI] , LENGTH/ 



\(ni ,n2 Lna 



) , FIELD/ni 



SORT Card 

The SORT card specifies the control fields used for 
[ J -g- f 1 [ j — n sorting, the type of sort, and the nature of the collating 
sequence. One sort card is required for each sort-and- 
merge or sort run. 
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-[ifn[ii(] 



The complete sort card has the following format: 

1 7 

f SORT, FILE/n, ORDER/n, FIELDS/(ni [ j^[ ]. • • • 



.n.[jA|]) [.SEQUENCE/ ||[] 

The fields of the sort card are defined as follows: 

, FILE/n 

The number n corresponds to the input number on the input 
FILE card and uniquely specifies the file to be sorted. 

, ORDER/n 

The number n specifies the order of merge (the number of 
merge tape units on each of the two channels to be used for 
merging). Note that n must be at least two and must not exceed 
eight. 

,FIELD/(„.[ I A| ],...,„, [\^\]) 

The FIELDS option specifies the control fields upon which 
sorting or merging is performed. The number Ui is the primary 
control field for sorting, n2 is the secondary control field, etc. 
Parameter n is the number corresponding to the position of the 
field-length parameter in the FIELD definer on the RECORD 
control card. The letter D indicates a descending sort and A, 
which need not be specified, indicates an ascending sort. 



[, SEQUENCE/ j-^-H 



If specified, C indicates that the fields (ni , . . . , nO are sorted 
according to the commercial collating sequence. If this param- 
eter is omitted or if S is specified, the scientific sequence is used. 

The following are examples of typical sort cards: 



{ SORT, FILE/62, SEQ/S, FIE/(3D), ORDER/2 | 

1 7 

/ SOR, FIELD/(2D, 1), ORD/3, FIL/263 I 

MERGE Card 

The MERGE card specifies control fields for merging. 
One MERGE card is required for each sort-and-merge or 
merge run. 

The complete merge card has the following format: 

1 7 

{ MERGE, FILES/ (m , . . . , n,), ORDER/n, FIELDS/ 



(Hi 



[j^f] 



.[jA 



([ 



m 



SEQUENCE/ 



m 



Most fields of the merge card are the same as those 
of the SORT card. During a sort-and-merge run, both 
the SORT and merge cards must be included. Each must 
specify its own files field. The other fields may be 
specified on either card but need not be put on both 
cards. The fields are defined as follows: 

, FILES/(ni , . . . , n,) 

Numbers ni through Ui correspond to the input number on the 
input FILE cards and uniquely specify the files to be merged. 



, ORDER/n 

The number n specifies the order of merge (number of merge 
tape units on each of the two channels used for merging). For 
merging, n equals the number of files to be merged and must 
not be less than two nor more than eight. For a sort-and-merge 
run, the order must be at least one more than the number of 
external files to be merged with the Merge Phase output during 
the Final Merge Phase. A sequence check on a file may be 
performed by using a merge order of one and specifying only 
one file. 



FIELDS/(„. [jA| ]..... „,[jA|] 



This field specifies the control field upon which merging is 
performed. Parameter n is a number corresponding to the posi- 
tion of the field-length parameter in the FIELD definer on the 
RECORD control card. The letter D indicates a descending 
merge and A, which need not be specified, indicates an ascend- 
ing merge. 



r SEQUENCE/ j-|^n 



If specified, C indicates that the fields (ui , . . . , ui) are 
merged according to the commercial collating sequence. If this 
parameter is omitted or if S is specified, the scientific sequence 
is used. 

The following is an example of a typical merge card: 



{ MERGE, SEQ/S, ORD/4, FIELDS/ (lA), 



( FILES (4, 6, 3, 1) 



CHANNELS Card 

The functions of the channels card are: 

1. To specify the channel on which to mount the 
input file during a sort or a straight merge run. 

2. To indicate the channels used for merging. 

3. To specify the output channel if desired. 

The actual physical units to be used are determined 
through the ibsys System Monitor and its Availability 
Table. One channels card is required for each run. 

The complete channels card has the following 
format: 



CHANNELS, 



A [n] [R] 
B [n] [R] 



INPUT/ / ^[^][|^]> ,MERGE/( 



A[R] 
B[R] 



H[R] 



Q [n] [R] 
UT [n] [R] 



A[R] 
B [R] I 



H[R] 



{,UT[R]]) 



OUTPUT/ 



A[R] 
B[R] 



H[R] 

c {n}, ci {ni} 
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The fields of the channels card are defined as 
follows: 

A [n] [R] 
B [n] [R] 



INPUT/ 



J [n] [R] 



. Qrnl[Rl . 
\ UT [n] [R] / 

This field designates the channel or units to be used for input. 
The following possibilities exist: 

1. If one of the real channels (A through H) is specified, 
Sort assigns a unit to the input function from the availability 
chain for that channel. This is normally the first 729 or 7340 
tape unit in the availability chain for the specified channel. 
However, if number n is specified, the nth units in the chain is 
assigned. Sort ignores devices other than 729 or 7340 tape units 
that may be in the chain. Normal practice calls for an input tape 
to be rewound and unloaded after sorting. Specifying the letter 
R causes the tape to be rewound only. 

2. If an intersystem units on a symbolic channel (J through 
Q) is specified, the units containing the proper indication in its 
unit control block is assigned to the input function. If n is not 
indicated, blank is assumed. The tape is never unloaded. The 
letter R appearing after an intersystem unit designation causes 
the unit to be released from the intersystem reserve status when 
sorting is finished. 

3. If the utility tape designation UTn is given. Sort assigns 
to the input function the unit to which the UTn function is at- 
tached. The number n must be any value from one to four. 

4. If more than one parameter is specified for a straight 
merge run, and each indicates a unit on the same channel, each 
parameter is assigned to the input function. On a sort run, not 
more than two units may be assigned to the input function. 



MERGE/ ( 



A[R] 
B[R]| 



H[R] 



A[R] 
B[R] 



H[R] 



[,UT[R]] ) 



This field designates the channels on which merging takes 
place. The following possibilities exist: 

1. For merging, two different real channels (selected from 
channels A-H) must be specified. Sort takes the required num- 
ber of units from the availability chain of each channel. 

2. Specifying the UT field causes the utihty tapes to be as- 
signed to the merge function if both 

a. The availability chain for a chaimel does not have enough 
uriits available for merging, and 

b. There is a utility tape on the channel which needs an- 
other merge tape. 

Under the IBSYS System Monitor, these tapes are still at- 
tached as IBSYS utility tapes. If any one of these tapes is used 
as a Sort output reel, it should not be used by another system 
in a utility function until the sorted file is used or removed. 

3. If R is specified, the tapes are rewound only. 



OUTPUT/ 



A[R] 
B[R] 



H[R] 

c {n}, Ci {ni} / _ 



The OUTPUT field designates the channel or unit on which 
the output is written. The following possibihties exist: 

1. If this field is not specified, output is written on the unit 
on which it would normally occur. The number of this unit is 



always printed on-line. Unless R is specified for the particular 
channel in the merge field, the tape is unloaded. 

2. When one of the real channels (A-H) is indicated and 
this channel is one of the two used for merging, an extra pass 
in the Merge Phase may be necessary to place the output on the 
proper channel. The output is placed on the unit on which it 
would normally occur. If a third channel is specified for output, 
tne extra pass is unnecessary. The output is ■nlaced on the first 
available unit in the availability chain for that channel which 
was not assigned to the input function. Letter R specifies that 
the tape is not to be unloaded. 

3. As many as two intersystem reserve units may be specified 
for output use. The letters c and Ci may be any of the inter- 
system channels J through Q. The letters n and m may be any 
of the eleven characters zero through nine and the BCD blank. 
If either n on Ui is omitted, the BCD blank is assumed. 

Under any of the following conditions, only one intersystem 
reserve unit will be available for output: 

a. If less than two intersystem reserve units are requested. 

b. If there is only one output reel. 

c. If the merge order is one. 

If one or more intersystem reserve units are specified on the 

CHANNELS card, Sort prints the message: 

UNIT XX IS INTERSYSTEM RESERVE UNIT YY 

where: 

XX is the absolute designation of the channel (e.g., A4) 
YY is the symboHc designation of the channel (e.g., Jl) 
The bits specifying the channel and tape units are placed in 

the first unit control word of the particular unit control block, 

and the tape is rewound. 

The following are examples of typical channels 
cards: 



r 



CHAN, INP/A2R, MERGE/(AR, DR), OUT/ER 

_7 

CHANNELS, 0UT/K2, INPUT/B3, MER/(A, D) 



OPTION Card 

The OPTION card specifies various available options. 
It is necessary to include an option card only if one or 
more options are required. 

The complete option card has the following format: 

1 7 

I OPTION [ CKSUMS] [, NOCKPT] [, EQUALS] 

] [, UNRDBLK] [, RELCOM/n] [, BUFFER] 
\ [, VARIABLE BL OCKING] [, MAP] [, HISTORY] 
j [, CARDS] [, TAPES] [, NOF] | 
The fields of the option card are defined as follows: 

[, CKSUMS] 

If specified, a check sum is computed for each logical record 
in a sort run, retained for the entire run, and then dropped when 
the final output is written. Since a merge run involves only one 
pass, check sums are not useful; hence the option is ignored in 

duced by the Internal Sort and Merge Phases must be of the 
same record format as those on the external merge tapes. Be- 
cause check sums on the internal file tape would cause the for- 
mats to be different, this option is ignored in such a run. 
[, CKSUMS] 

When NOCKPT is specified, it indicates that no checkpoints 
are to be written during the Sort. Normal checkpoints are, 
therefore, deleted. If there is no tape attached as SYSCK2, the 
NOCKPT option is assumed. If no checkpoints are taken, re- 
start is impossible except from the begirming of job (see "Check- 
point and Restart Procedure"). 
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[, EQUALS] 

When this option is specified. Sort adds a record-sequence 
word to each logical record to keep all records with equal con- 
trol fields in the same order as they appear in the input file. 
Whether or not this option is specified. Sort never deletes rec- 
ords from a file solely because they are equal. Deletion of equal 
records can be accomplished through a modification by the 
user. The EQUALS option should not be used in a merge run 
or m a combined sort-and-merge run for the same reasons as 
given under CKSUMS. 

[,UNRDBLK] 

The UNRDBLK field is used if Sort is to be deleted when an 
unreadable record occurs. This option causes deletion of Sort 
if one of the following occurs : 

a. Either an offsize record block or a redundant record block 
is read by the Internal Sort Phase, Merge Phase, or Final 
Merge Phase. 

b. The check sum of a logical record is in error. 

[, RELCOM/n] 

For this field, n is the number of locations in upper core 
storage that Sort should leave above its COMMON area. To en- 
sure adequate storage area for sorting, n should not exceed 
10,000. Sort automatically leaves room for SPOUT, the lOEX 
off-line message writer, which occupies the 200 locations just 
under SYSEND. 

[, BUFFER] 

If specified. Sort reads fixed-length records into a buffer 
rather than using a "scatter-read" method. This option permits 
records to be modified before they are sorted. Specifying this 
option reduces the size of the Record Storage Area. 

[, VARIABLE BLOCKING] 

If this option is specified, Sort accepts short blocks of fixed- 
length records if the block lengths are multiples of the logical 
record length. 

[, MAP] 

When this option is specified, the load addresses of all sub- 
programs are printed on-Une. 

[, HISTORY] 

This field specifies that messages and counts are printed on- 
hne between phases and passes. 

[, CARDS] 

This field specifies that columns 7-72 of all control cards 
are printed on-line. The REMARK card is always printed 
whether or not this option is selected. 

[, TAPES] 

Specifying this option causes the on-line printing of tape 
assignments to show: 

1. The input units, in the order in which the files on these 
units are read 

2. The merge units, in their order of use, on which the In- 
ternal Sort Phase writes 

3. The remaining merge units in their order of use 

4. The output units, in their order of use, if the output chan- 
nel is specified on the CHANNELS card 

5. The checkpoint tape if attached. 

For a merge-only run, the input and output units are hsted 
in their order of use. 

[, NOF] 

This field specifies that no off-line messages are written on 
SYSOUl. If there is no SYSOUl attached, the NOF option is 
assumed. If NOF is not specified, unreadable records and the 
information indicated by the MAP, CARDS, TAPES, and 
HISTORY options are always written on SYSOUl. If unread- 
able records cannot be written on SYSOUl, they are put on 
SYSCK2 if it is attached. 



The following are examples of typical option cards: 

1 7 

/ OPTION, CKS, TAPES, MAP, HIS, EQU, NOF 



1 7 



{ OPT, NOCKPT, CARDS, BUF, VAR BLOCK, REL/1000 I 



LABEL Card 

The LABEL card is used to specify nonstandard labels 
on the output file. 

The complete label card has the following format: 

1 7 

( LABEL, IDENT/nHxxx . . . x„ I 

The field of the label card is defined as follows: 

, IDENT/nHxxx . . . Xn 

The letter n represents a number not less than 18 nor more 
than 120 and is a multiple of 6. It indicates the number of 
characters, xxx . . . x„, comprising the label that is written at the 
beginning of each final output reel. If the number of characters 
after the letter H is greater than n, the excess characters are 
truncated. If n is such that the string of characters would extend 
beyond column 72, a continuation card must be used even if 
the characters on it are all blank. Characters on the continuation 
card must begin in column 7 immediately following the X in 
column 6. 

The following is an example of a typical label card: 

1 7 

( LAB, IDENT/30H MACHINE ROOM PA YROLL ' 

} ACCOUNTS| 



OVERFLOW Card 

The overflow card causes skipping of tape records 
that were read and processed during a previous sort 
run which had overflowed. An overflow card should 
be included only if it is desired to skip tape records at 
the beginning of the input file. 

The complete format for the overflow card is as 
follows: 

1 7 

/ OVERFLOW, BLOCKS/n I 

The field of this card has the following definition: 

, BLOCKS/n 

In this field, n is a decimal number specifying the number of 
tape records on the current reel that have been processed. 
Labels, checkpoints, or dictionary records are not included. 
When the maximum number of logical records to be sorted ex- 
ceeds the number that can be processed by Sort, an overflow 
condition occurs. If an overflow condition occurs, a message is 
printed explaining the situation and giving the number of tape 
records already sorted on the current input reel. Two options 
are given in case of overflow: the sort can be continued, but an 
unending merge may occur; the sort can be discontinued after 
the records that were read in before the overflow occurred have 
been sorted. In the latter case, the OVERFLOW control card 
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ma^ be used in a subsequent run to skip all tape records that 
were read in before the overflow occurred and to restart the 
sort after that point in the input file. The output from this sort 
can then be merged with the output from the sort that over- 
flowed, to produce the entire sorted file. 

The following is an example of a typical overflow 
card: 



OVER, BLO/6 



DELETE Card 

T'l^o TMT'T g-Tg '^'^rd '^'^^"'ses a field in each lo'-'^ical record 
to be compared with a given field and a record deleted 
if the fields are alike. One delete card must be in- 
cluded for each control field configuration on which a 
comparison is to be made. For example, to delete all 
records beginning with the character A, B, or C, three 



The complete format for the delete card follows: 

1 7 

( F\ I 

! DELETE, FIELD/n, IDENT/n j B xxx . . . Xn ! 

(h) 

The field definitions of the delete card are given 
below: 

, FIELD/n 

Number n is the field, defined as ni on the RECORD control 
card, on which comparison is based. 



, IDENT/n 



O 

B 
H 



For this field, n is the number of octal figures ( O ) , binary bits 
(B), or alphameric characters (H) following the appropriate 
identifying letter. This information, expressed as xxx . . . Xn, is 
compared to the indicated field on the RECORD card. If the in- 
formation is found in the specified field of a record, that record 
is deleted from the sort. The field xxx . . . Xn must cover the full 
length of the field described on the RECORD control card. 

The following are examples of typical delete cards: 

1 7 

/ DEL, FIELD/6, IDENT/30452 

1 7 

/ DELETE, IDE/9B100101010, FIE/3 



REMARK Card 

Any number of remakk cards may be included in a 
run. The format for this card is: 

1 7 



f 



REMARK xxx . . . 

The field ( xxx . . . ) of this card represents any desired mes- 
sage that is to be printed on-line. Columns 7-72 of this card 
are always printed, regardless of the CARDS specification on 
the OPTION card. 



Thft followinp' is an examnle of a tvoical remark 
card: 

1 7 

( REMARK ACCOUNTS RECEIVABLE RUN | 



MODIFICATION Card 

This card specifies subprograms which are provided 
by the user of Sort. One modification card must be 
included for each user modification that is used during 
the run. 

The complete format for the modification card is: 

1 7 

{ M ODIFICATION, PROGRAM/name, CELLS/n 

\ [, LOCATION/SYSxxx] [, FORMAT/ \^[\ 

The fields of this card have the following definitions : 

, PROGRAM/name 

To designate the modification subprogram, "name" must be 
one of the names for which modification exits have been pro- 
vided in the Sort system. 

, CELLS/n 

Decimal integer n indicates the number of core-storage loca- 
tions occupied by the modification program and its parameters. 

[, LOCATION/SYSxxx] 

The parameter SYSxxx informs Sort on which of the SYSUNI 
units the modification program is located. If it is on SYSLBl, 
the field may be omitted. If the modification is on tape, it must 
be in relocatable column-binary card format. If the modifica- 
tion program is in the card reader, it must be in relocatable 
row-binary card format. 

If more than one modification is to be used during a phase 
and several modifications reside on one tape, they must be ar- 
ranged on that tape in ascending order (XSM04, XSM06, 
XSMIO, etc.). The user must make certain that the tape is cor- 
rectly positioned so that the requested program can be located. 
SYSUNI tapes will not be rewound and searched again. 

[,FORMAT/j-5-|] 

This field informs Sort whether the modification is blocked 
as one tape record or is in single card-image format. If the 
modification program is blocked, this field may be omitted. A 
blocked modification program must have the same format as 
the regular subprograms on the IBSYS system tape. 

The following are examples of typical modification 
cards: 



{ MOD, PROGRAM/XSxM04, CELLS/800, LOC/SYSUT3 | 

1 7 

( MODIFICATION, FOR/U, CELLS/1000, PRO/XSM06 | 



RESTART Card 

The restart card is used to initialize a restart pro- 
cedure (see "Checkpoint and Restart Procedure"). The 
format for the restart card is: 

1 7 

/ RESTART 1 
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END Card 

The END card must be the last card in each control card 
deck. If Sort jobs are stacked, the end card is the only 
card separating the decks. 

The complete format for the end card is: 

1 7 

/ END ~~ 



OPTION, CKSUMS, NOCKPT, HISTORY, CARDS 



L 



CHANNELS, MERGE/ (A, B), INPUT/A 



SORT, FILE/1, SEQUENCE/S, ORDER/3, FIELD/2A 



{ RECORD, TYPE/F, LENGTH/14, FIELDS/ (12 CU, 4CU) 

r FILE, MODE/D, BLOCKSIZE/1400, OUTPUT, DENSITY/H 
r FILE, INPUT/1, REELS/1, MODE/b, DENSITY/H, BLOCKSIZE/1400 



If 



ir 



in 

"1 n 



The same Sort run can also be accomplished by 
using the cards listed below: 



Typical Control Card Decks 

The following Sort control card deck may be used to 
sort a file of 14-word fixed-length records having 100 
records to a block. Sorting is done on the first four 
characters of the third word of each record, using the 
scientific collating sequence. 



I 



£ 



L 



OPT, CAR, NOC, HIS, CKS 



CHA, INP/A, MER/(A, B) 



L 



/ SOR, ORD/3, FIE/2, FIL/1 



REC, FIE/(12,4), LEN/14 



FIL, OUT, BLO/1400 



in 



M 



Tr 



11 



IV 



FIL, INP/1, BLO/1400 



IV 
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The IBM 7090/7094 Sorting System comprises the sub- 
programs Hsted in Table II. They are Hsted in the order 
in which they appear on the distributed system tape, 
symbohc tape, and listing tape. The description of each 
subprogram is given with the phases during which it 
may be loaded. In this table, ep stands for Edit Phase, 
Fxs for Internal Sort Phase with fixed-length records, 
vxs for Internal Sort Phase with variable-length rec- 
ords, xs for both types of Internal Sort Phase, mr for 
Merge Phase, and fm for Final Merge Phase. If Sort 
uses only 729 magnetic tapes for a given run, the sub- 
programs marked (729) are loaded. If 7340 Hypertape 
Drives are used at any time during the run, the sub- 
programs marked (7340 and/or 729) are loaded. 

Table II : Sort Subprograms 



Table II: Sort Subprograms (Cont.) 





SYMBOLIC 








CARD 








IDENTIFI- 




phase(s) 


NAME 


CATION 


DESCRIPTION 


LOADED 


SORT 


ISM 


Monitor and Loader 


All 


HYSTAR 


ARS 


Restart 


EP, XS\ MRi 
FMi 


lOPEN 


ASO 


Open and Close 
(729) 


XS, MR, FM 


LABEL 


BLB 


Label 


AU 


BTD 


CBT 


Binary to Decimal 


All 


CALC 


CCA 


Calculations 


EP 


EPOOl 


CEP 


Edit Phase 


EP 


RBOl 


CRB 


Control Card 
Conversion 


EP 


RELEAS 


CRE 


Release Tapes 


EP,FM 


SKOOl 


CSK 


Scan Control Cards 


EP 


VXS 


CVX 


Variable Internal 
Sort 


VXS 


MRGIO 


DBS 


Merge I/O (729) 


MR,FM 


BUFRD 


DBU 


Buffer Read 


FXS^ 


XTRACT 


DEX 


Extract Control 
Fields 


XS, MR, FM 


FXS 


DFX 


Fixed Internal Sort 


FXS 


GET 


DGE 


Buffer Read (729) 


VXS 


PUT 


DPU 


Scatter Write 


VXS 


READ 


DRE 


Scatter Read 


FXS 


WRITE 


DWR 


Scatter Write 


FXS 


WTFIX 


DWT 


Table Fixer 


FXS 


DEBLK 


EDD 


Deblock and Dump 


XS, MR, FM 


FIMRG 


EVF 


Final Merge Phase 
(729) 


FM 


MERGE 


EVM 


Merge Phase (729) 


MR 


POSTP 


FPP 


Postprocessor 


FM 


CKPT 


GCK 


Checkpoint Writer 


XS\ MR\ 
FM^ 


DELETE 


GDE 


Delete 


XS.1, FM^ 


HYFIMR 


HFM 


Final Merge Phase 
(7340 and/or 729) 


FM 


MRGHYO 


HIO 


Merge I/O (7340 
and/or 729) 


MR, FM 



SYMBOLIC 





CARD 








IDENTIFI- 




phase(s) 


NAME 


CATION 


DESCRIPTION 


LOADED 


HYMERG 


HMR 


Merge Phase (7340 
and/or 729) 


MR 


HYOPEN 


HOP 


Open and Close 
(7340 and/or 729) 


AU 


HYGET 


HYG 


Buffer Read (7340 
and/or 729) 


VXS 



^ Optional 



Programs Loaded in Each Phase 

In Figure 3, the symbols T1-T6 indicate the time se- 
quence of the various stages of Sort. In a straight 
merge run, T4 and T5 are omitted. The symbols are 
explained in the following text: 



00000 Octal 



MACHINE-ORIENTED CELLS 



IBNUC 



lOEX 



Tl 
IBSUP 



T2 
SORT MONITOR AND LOADER 



T3 



EDIT 
PHASE 



T4 

INTERNAL 
SORT 
PHASE 



T5 



MERGE 
PHASE 



T6 

FINAL 
MERGE 
PHASE 



T3 T4 T5 T6 COMMON STORAGE 

OPTPR MODPR GENPR 
OVEPR RECPR RAWPR 
LABPR DELPR CNTPR 
CHAPRSAMPR ERAPR 
FILPR CALPR REFPR 



SPOUT 



> ABSOLUTE 



V RELOCATABLE 



SYSEND 
Figure 3. Core Storage Layout for 7090/7094 Sort System 
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TI — Calling of 7090/7094 Sort 

Sort is called by the ibsys System Monitor by a 

1 16 

$EXECUTE SORT 

control card (see "ibsys System Monitor Control 
Cards"), ibsys defines the machine configuration and 
provides the necessary information on the availability 
of input/output units. 

72 — Loading of Sort Monitor 

IBSYS loads the Sort Monitor. At this point, control 
passes to the Sort Monitor. The Sort Monitor includes 
the Sort Subprogram Binary (ssb) Loader, which loads 
the subprograms required for each phase. 

T3 — Loading and Execution of Edit Phase 

At the beginning of execution of Edit Phase, the con- 
trol cards are read from sysini, the symbolic designa- 
tion of the IBSYS input function. They are analyzed to 
determine if a sort and/or merge run is to be per- 
formed or if control is to be returned to ibsys. The sub- 
programs loaded in this phase are: 



HYSTAR 




RBOl 


LABEL 




RELEAS 


BTD 




SKOOl 


CALC 




HYOPEN 


EPOOl (M) 






( M) Main su 


bprogram of the phase 



74 — Loading and Execution of Internal Sort Phase 

The Internal Sort Phase subprograms for the internal 
sort of either fixed-length or variable-length records 
are loaded to overlay the Edit Phase. The subprograms 
loaded in this phase are: 

FOR FIXED-LENGTH RECORDS FOR VARIABLE-LENGTH RECORDS 



HYSTARi 


HYSTAR! 


lOPEN or HYOPEN 


lOPEN or HYOPEN 


LABEL 


LABEL 


BTD 


BTD 


XTRACT 


VXS (M) 


FXS (M) 


XTRACT 


READ or BUFRD 


GET or HYGET 


WRITE 


PUT 


WTFIX2 


DEBLK 


DEBLK 


CKPT! 


CKPTi 


DELETE 


DELETE! 




! Optional 




^ Loaded only if READ is loaded 


(M) Main subprogram 


of the phase 



75 — Loading and Execution of Merge Phase 

The Merge Phase subprograms, if needed, are loaded 
to overlay the Internal Sort Phase. The subprograms 
loaded in this phase are: 

HYSTAR! 

lOPEN or HYOPEN 

LABEL 

BTD 

MRGIO or MRGHYO 



XTRACT 

DEBLK 

MERGE or HYMERG ( M ) 

CKPT! 

! Optional 

(M) Main subprogram of the phase 

76 — Loading and Execution of Final Merge Phase 

The Final Merge subprograms are loaded to overlay 
the Merge Phase. The subprograms loaded in this 
phase are: 



XTRACT 

DEBLK 

FIMRG or HYFIMR (M) 

POSTP 

CKPT! or HYCKPT! 

DELETE! 



HYSTAR! 

lOPEN or HYOPEN 

LABEL 

BTD 

RELEAS 

MRGIO or MRGHYO 

! Optional 

(M) Main subprogram of the phase 

After the Sort run has been completed, the Post- 
processor subprogram of the Final Merge Phase is exe- 
cuted. This subprogram releases all tape assignments 
and prints counts of records sorted, records deleted, 
records dumped, padding records added, and reserve 
units used for intersystem communication. It then re- 
turns control to the Sort Monitor, which in turn returns 
control to the T3 stage of Sort. 



System Tape 

The IBSYS system tape contains in two adjacent files all 
the subprograms which comprise the Sort system. The 
first file contains one subprogram, named sort, which 
contains the Sort Monitor and Loader. The second file 
contains several subprograms, each assembled in re- 
locatable form and consisting of one tape record 
formed by blocking the column-binary card images for 
the subprogram. References to "card" signify a card 
image on the ibsys system tape. 

The subprograms that are to be loaded by the Sort 
Loader are placed on the ibsys system tape in the fol- 
lowing manner: 

Loading Format and Name of First Subprogram 
Program Card 
Program 
Transfer Card 

Interrecord Gap 

Loading Format and Name of Second Subprogram 
Program Card 
Program 
Transfer Card 

Interrecord Gap 

Interrecord Gap 

Loading Format and Name of Last Subprogram 
Program Card 
Program 
Transfer Card 

End-of-File Tape Mark 
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I'he entries in the preceding list are described as 
follows: 

Loading Format and Name: The first three cards in 
the blocked subprogram tape record must have the 
following format: 

lOCP 45000 , , 1 

BCI 1 , (name of subprogram) 

lOCP 45002 , , n 

where n is the number of words in the program follow- 
ing the second locp. The information supplied by these 
cards is used for program recognition and for loading 
whenever the Sort Loader is not used (e.g., when load- 
*"£, from a unit otiier Luan a tape unit or wnen editing 
an iBSYS system tape). 

Program Card: The program card, prepared by 
IBSFAP, contains the entry names used in the subpro- 
gram, the length of the subprogram, the length of the 
transfer vector, and the common break (i.e., the high- 
est core-storage location before common storage). Ten 
is the maximum number of entry names that may be 
used in any Sort subprogram or user's modification 
subroutine. 

Program: The program must be assembled in relo- 
catable binary form using ibsfap. 

Transfer Card: The Sort Loader recognizes the end 
of a subprogram when it reads a transfer card. The 
transfer card may have either of the following formats, 
both of which have the same effect on the Loader: 

1. 12-punch, 7-punch, and 9-punch in column one 

2. 11 -punch, 7-punch, and 9-punch in column one 
When an ibsys system tape is assembled by ibedt 

and relocatable subprograms are either inserted or re- 
placed from the punch tape prepared by ibsfap, all 
required cards are provided by ibedt. 

Sort Subprogram Binary Loader 

The subprograms necessary for each phase of Sort are 
loaded by the Sort Subprogram Binary (ssb) Loader 
prior to the initiation of the phase. Thus, storage is not 
taken up by subprograms used by another phase, and 



the number of core-storage locations used by subpro- 
grams is kept to a minimum for each phase. 

In loading subprograms, the ssb Loader performs the 
following operations: 

1. It clears core storage between its own location 
and that of common storage location. 

2. It reads a subprogram into core storage beginning 
at octal location 45000. 

3. It determines whether that subprogram is needed 
for the particular phase of Sort involved. 

4. If this subprogram is needed, it is relocated as far 
down in core storage (toward sysorg) as possible so 
that it follows directly after the last subprogram that 
was loaded. 

5. Operations 2, 3, and 4 are repeated until all sub- 
programs needed for the given phase are loaded. 

The SSB Loader must know the number of subpro- 
grams to be loaded during each phase, the names of 
these subprograms, and the input devices on which 
these programs are located. This information is sup- 
plied to the Loader by a calling sequence, which is 
constructed during Edit Phase by the Calculations sub- 
program.. All subprogram's except m.odification sub- 
routines must be on the system tape. The modification 
subroutines may be located in th^e card reader (syscsd), 
on any sysuni tape, or on the ibsys system tape. 

While loading each phase, the ssb Loader builds a 
list of names of subprograms that have been loaded. 
The list also specifies where the subprograms are 
loaded and indicates the number of transfer vectors 
associated with each subprogram. After loading has 
been completed, each entry in the transfer vector of 
each subprogram is replaced by a transfer to the load 
address of the called subprogram (i.e., by a ttr *****) 
if the subprogram has been loaded. If the subprogram 
has not been loaded, a store-location-and-trap instruc- 
tion (sTR o,o,o) replaces the transfer vector. If a sub- 
program that was not loaded is called, the str instruc- 
tion causes an ibsys core-storage dump to be taken. 
This Sort run is then deleted and additional Sort runs 
are deleted until a $job card is processed by ibsys. 
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Chapter 5. File Structure 



Input to Sort consists of files of either fixed-length or 
variable-length logical records, written in either binary 
or decimal mode. The maximum length of a tape 
record is 2,000 words, not including the check-sum 
block-sequence word, that can be appended to a tape 
record if the file is written in binary mode. The mini- 
mum length of a tape record is three words, in keeping 
with tape error recovery conventions employed by 
lOEX, the input/output executor of the ibsys System 
Monitor. 

Table III specifies the density and mode conventions 
of header labels, dictionaries, checkpoints (which may 
appear only on input files), data, trailer labels, and the 
end-of-file (eof) marks associated with all of them. 
Sort expects these conventions to be used when input 
for a sort and/or merge run is created. All output from 
Sort is governed by these same conventions. 

Table III: Density and Mode Conventions 



RECORD 


MODE 


DENSITY 


REMARKS 


Header 
Label and 
EOF 


Decimal 


High or 
low 


Label and EOF must 
have same density. How- 
ever, density and mode of 
label and EOF may differ 
from that of data. 


Dictionaries 
and EOF 


Decimal 


High or 
low 


If a file is labeled, dic- 
tionary must have same 
density as label. If a file 
is unlabeled, density and 
mode of dictionary may 
differ from that of data. 
Dictionary and EOF must 
have same density. 


Checkpoint 
and EOF 


Binary 


High or 
low 


Checkpoint and EOF 
must have same 
density as data. 


Data 
Blocks 
and EOF 


Binary 

or 
Decimal 


High or 
low 


Data and EOF must have 
same density. 


Trailer 
Label 
and EOF 


Decimal 


High or 
low 


Label and EOF must 
have same density as 
data. 



Labels 

A label is a one-record tape file that identifies a data 
file or part of a data file. Labels occur at the beginning 
and at the end of a file. The first label of each segment 
is the header label, and the last label is the trailer label. 
Standard labels contain the name of the file, the 
length of time the file is to be retained, the date on 
which the file was created, and information concerning 
the characteristics of the data file. 



Labels may be used to identify segments of a file. 
For example, if a file is contained on five reels of tape, 
the header labels indicate the order in which the reels 
should be read, and the trailer label on each reel indi- 
cates whether or not the file has come to an end. Each 
reel before the last reel has an end-of-reel trailer label. 
The last reel ends with' an end-of-file trailer label. 

Sort handles either of two types of standard labels. 
These are the 7090/7094 iocs label described in the 
publication IBM 7090/7094 IBSYS Operating System, 
Input/Output Control System, Form C28-6345, and 
the IBM standard tape label described in the publica- 
tion IBM Standard Tape Label, Form C28-8142. 

If the input file card specifies that the input file has 
a standard label, the label is read and checked. If the 
input is on 729 magnetic tape, the label may be either 
the 14-word iocs label or the 20-word ibm standard 
label. If the input is on 7340 Hypertape, the label must 
be the 20-word ibm standard label. 

If the output FILE card requests a standard label on 
the output file, the label is the 20-word ibm standard 
label if the output is on 7340 Hypertape. If the output 
is on 729 magnetic tape, the 14-word iocs label is writ- 
ten unless the input file contains the 20-word ibm 
standard label. In this case, the 20-word ibm standard 
label is written on the output file. 

If the input file contains a nonstandard label, the 
label is read if so specified on the input file card. It is 
not checked. Nonstandard labels may be up to 20 
words long and are truncated if they exceed this limit. 

A nonstandard label is put on the output file by 
specifying it on the output file card. If a label control 
card is present, the output label contains the informa- 
tion found on that control card. If there is no label 
card, the nonstandard output label is the label (stand- 
ard or nonstandard) read from the input file. 



Dictionary 

If a 9PAC Dictionary is present, it is in the first file on 
the tape. It may be the only information in this file, or 
it may share the file with the label. In the latter case, 
its position is between the label and the end-of-file 
mark. Dictionary records are 14-word bcd tape records 
(see the publication IBM 7090 Programming Systems: 
SHARE 7090 9PAC Part 1: Introduction and General 
Principles, Form J28-6166). There is no limit to the 
number of dictionary records. During the Sort, the 
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records are savea on sysck2 ana are tnen transterrea 
to the final output file. If no sysckz tape is attached, 
the dictionary records are deleted. 



T ^ D^ J r^^_ .X 
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The number of data words in a tape block, which com- 
prises one or more logical records, must be at least 3 
and not more than 2,000. In a binary file, an extra word 
may be added to each block. This word, containing a 
block check-sum block-sequence number, is not con- 
sidered in the block size or in the 2,000-word maximum 
size (see "Input and Output file Cards"). 

Fixed-Length Block Format 

The block size specified on the input fh^e card must 
equal the number of data words in an input block un- 
less the VAEiABLE BLOCKING optiou is Specified on the 
OPTION card. In this case, the number of data words 
may be fewer than the block size given, but it must be 
a multiple of the input logical record length. An out- 
put block contains the number of data words specified 
by the block size on the output file card. Unless pad- 
ding is specified, the last output block may be smaller 
than the block size if there are not enough records to 
fill the block. 

Variable-Length Block Format 

The block size specified on the input file card must 
be at least equal to the number of data words in the 
largest input block. An output block contains no more 
data words than the block size number specified on the 
output FILE card unless there is a logical record having 
more data words than this number. In this case, the 
larger logical record is written in a block by itself. 
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Fixed-Length Records 

Fixed-length input records may be in either binary or 
decimal mode, and one or more records may be 
blocked to form a tape record. As with a tape record 
block, maximum size of a logical record is 2,000 words. 
Minimum logical record size may be one word, but a 
taf^e record must contain at least three words. 

Variable-Length Records 

Variable-length input records may be in either binary 
or decimal mode, and one or more records may be 
blocked to form a tape record. Maximum size of a 
variable-length record is 2,000 words, including the 
record control word. 

The two modes are described as follows: 



Binary Mode: The first word of binary logical rec- 
ords is a record control word whose decrement con- 
tains the number of data words in the record following 
this control word. The format for this word is: 

IOCTN**,,n 
Sort uses only the decrement of this word. 
Variable-length records in binary mode must contain 
the record control word and at least two data words 
unless the check-sum and/or block-sequence option(s) 
is taken. If either of these options is chosen, the mini- 
mum three-word tape record length is assured even if 
the data consists of only one word. 

Decimal Mode: The first word of bcd logical records 
is a record control word containing the number of 
characters in the entire record, including the control 
word and data words. This number is expressed as five 
BCD characters right-justified in the first five characters 
of the word. The sixth character may be any valid bcd 
character. 

Examples 

00036C 
00108E 

The record length must be at least 18 characters and 
must be a multiple of 6. 

When the input record is in bcd and the requested 
output is binary, the record control word on the output 
tape is expressed in the form 

lOCTN** , , n 

If a variable-length record not within the range of 
lengths specified on the record control card is read 
in the Internal Sort Phase, Sort cannot continue. An 
error message is printed, followed by a pause during 
which a core storage dump may be taken. 

In the Final Merge Phase, variable-length records 
read from an external merge tape during either a 
merge or a sort-and-merge run are checked to deter- 
mine if the block length equals the sum of the lengths 
of the records in the block. 



Internal Record and Block Format 

All tapes prepared by the Internal Sort and Merge 
Phases are written in the binary mode. The number of 

iccuiu-a pci uiucjs. uii uicsc Ltipca imty uiulci iiuiii uic 

number of records in an input or output block. 

Two words are added at the beginning and one at 
the end of each merge block. These words contain the 
following merging information: 

1. The block-sequence number in the address of the 
first word 

2. The string count in the decrement of the second 
word 
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3. The number of records per block in the address of 
the second word 

4. The block length in the decrement of the word at 
the end of the block 

The first half of the first word and the last half of the 
last word contain special bit structures to detect char- 
acter shifting by the merge tape unit. 

If either the cksums or equals option or if both 
options are specified on the option control card, the 
logical record length is automatically enlarged during 
the Merge Phase to accommodate the extra word which 
is added to each record for each option. These extra 
words are dropped during the Final Merge Phase. 

Control Field Format 

The control fields of a record may be expressed in 
either bits or characters. If control fields are to be 
sorted in accordance with the commercial collating 
sequence and the control fields are expressed in bits, 
the number of bits specified must be a multiple of 6. 
It is possible to mix, in the same record, control fields 
to be sorted in ascending sequence with fields to be 
sorted in descending sequence. The maximum number 
of control fields which may be defined in a logical rec- 
ord has been effectively set at 2(X). If necessary, this 
number can be increased in the Edit Phase by chang- 
ing BES 200 to BES XXX (where xxx is the number of con- 
trol fields desired) at the following symbolic locations: 



FIELN 


FILLB 


FIEUS 


FILNW 


FILSW 


FILLM 


FILSB 


FILRM 



Control Field Information 

Each control field used to sort or merge records has a 
9-word block of information in storage. This informa- 



tion is developed during the Edit Phase from the 
parameters on the sort (or merge, in a merge run) 
control card. The contents of each word are given 
below. 



WORD 


BITS 


CONTENTS 


1 


3-17 


Numbers of words over which the control 
field extends 




18-20 


- logical ascending 

1 - logical descending 

2 - algebraic ascending 

3 - algebraic descending 

4 - signed BCD ascending 

5 - signed BCD descending 




21-35 


Number of the word in the logical record 
that contains the last bit of the control field 


2 




RQL ** 


3 




LGL ** 


4 




LGL 


5 




LGL ** 


6 




LGL ** 


7 




LGL ** 


8 




LGL ** 


9 




LGL ** 



The control field information facilitates extraction of 
the associated control field. In a sort or merge run, all 
of the control fields are extracted and placed in front 
of the record. The rql and lgl instructions needed in 
the extraction subprogram (xtract) are initialized by 
the Edit Phase. 

Each DELETE control field also has a corresponding 
storage block of at least four words, as follows: 



i'ORD 


BITS 


CONTENTS 


1 


3-17 


Number of words over which the control 
field extends 




21-35 


Starting word of control field 


2 




Left mask of first word 


3 




Right mask of last word 


4-n 




Information to compare with DELETE con- 
trol field. 



Both of the above information blocks are built from 
high core-storage toward low core-storage locations. 
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Chapter 6. Modifications by the User 



Facilities are provided to allow the user to insert his 
own subroutines into the Sort system at load time. 
These subroutines can be entered and executed at spe- 
cified points in the Sort system. 

Modification subroutines are requested by using the 
MODIFICATION coutrol Card. One control card must be 
used for each modification subroutine desired during 
a run. The use of a modification card sets a switch in 
COMMON to signify that a modification subroutine 
should be entered and executed. Tests for checking the 
status of these switches and transfers to modification 
subroutines are included at the locations in Sort where 
modifications are most desired. Each modification sub- 
routine is loaded during the phase in which it is to 
be used. 

As with other Sort subprograms, ibsfap must be 
used to assemble the modification subroutines in re- 
locatable form. Modification subroutine names are re- 
stricted to those for which exits from Sort have been 
provided. Names of modification subroutines used 
during Internal Sort Phase begin with the letters XSM; 
during the Merge Phase, with mpm; and during Final 
Merge Phase, with fmm. 

If an installation performs many types of Sort runs, 
it is sometimes desirable that one modification switch 
be used for several subroutines, each of which is 
unique to the type of Sort run being performed. For 
example, it is possible to specify the following on the 
modification card: 

PROGRAM/XSM04C 
where C is any valid bcd character. This permits load- 
ing of a particular subroutine, depending on the type 
of run. 

Example 

Suppose that in run one, the modification subroutine FMM04 
is different from the modification subroutine to be used at the 
same place during run two. The MODIFICATION control cards 
for run one and nin two might be as follows: 



r 



MODIFICATION, PRO/FMM04 A, CELLS/20, 

}L0C/SYSUT3, for/b| 
and 
1 7 



f 



MOD, PROGRAM/FMM04Z. CEL/50, 



LOCATION/SYSUT3, FORMAT/B 



A modification subroutine may obtain parameters 
from common storage if common has been defined in 
the subroutine as it is in each of the Sort subprograms. 
Modification subroutines may communicate with each 
other, or with any of the Sort subprograms, through 
transfer vectors or through common. Each modifica- 
tion subroutine must save and restore any registers 
(e.g., AC, MQ, index registers, or sense indicators) 
which it uses. 

After a modification subprogram has been assem- 
bled, if ebedt places it in the second file of Sort on the 
IBSYS system tape, the correct format is provided by 
ibedt. Hov/ever, if the modification subroutine is to be 
read from the card reader or from a sysuni tape other 
than the ibsys system unit, the transfer card must be 
provided by the programmer. An easy way to do this 
is by using the following sequence: 



*FAP 
FUL 
OCT 
END 
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400500000000 (or 200500000000) 



Programs FMM04A and FMM04Z would be loaded during runs 
one and two, respectively. 



The assembly of this sequence, which immediately 
follows the assembly of the subroutine, places a card 
on the punch tape after the cards of the subroutine. 
This card has the proper bits so that it is recognized 
by Sort as a transfer card. 



Modification Exits 

In the following discussion of modification exits, the 
exits associated with the Internal Sort Phase are given 
first. Following these is a Merge Phase exit, and then 
the Final Merge Phase exits. 

For each exit, the exit name is given first. Then the 
logical condition of the Sort run at the point where the 
exit is utilized is indicated. Following this, the possible 
uses of the exit are listed. 

Information related to the run during its different 
■•^hases is often contained in areas ^i.e. ebapr galpb. 
etc.) within common storage. The contents of the 
words in these areas, identified by a number following 
the area name, is listed for each phase of the run in 
the section "Allocation of common Storage." In de- 
scribing the exits, the locations of information that may 
be required for a particular subroutine are given. 

The general procedures for typical uses of the exit 
are then described. The returns used after the sub- 
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routine are identified, and a flow chart showing the 
main steps of Sort associated with the exit is provided. 

Exit XSM04 (Fixed-Length Record Run) 

Logical Condition at This Point: A group of sorted 
records is ready to be written onto a merge tape by 
the Internal Sort Phase. 

Possible Uses of XSM04: The xsmo4 exit may be 
used: 

1. To summarize records 

2. To delete records 

3. To alter records 

4. To lengthen or shorten records 

Parameter Locations: Key parameters at this point 
are located at: 

ERAPR-27, which contains in its address the location of a 
table of tags. Each of these tags points to one of the records to 
be written. The decrement of ERAPR-27 gives the length of this 
table (the number of tags). 

ERAPR-26, which contains in its address the location of a 
group of tags. Each of these tags points to a bin not currently 
being used. The decrement of the word at ERAPR-26 gives the 
length of the group. 

ERAPR-1, which contains in its address the location of a table 
of tags. Each of these tags point to one of the records currently 
being processed by the Internal Sort Phase. The decrement of 
ERAPR-1 gives the length of this table. The table whose loca- 
tion is given at ERAPR-27 is part of the table whose location is 
given by ERAPR-1, and it precedes the table whose location is 
given in ERAPR-26. 

ERAPR-3, which indicates the number of unused bins, not 
including those whose locations and lengths are given in 
ERAPR-26, at the time the modification subroutine is entered. 
The table of tags pointing to these unused bins follows the table 
whose location is given at ERAPR-1. 

The tables whose locations are given at ERAPR-1, ERAPR-3, 
and ERAPR-26 are contiguous. The table whose location is 
given at ERAPR-1 is nearer SYSORG. It is followed by the 
table whose length is given in ERAPR-3 and then by the table 
whose location is given in ERAPR-26. The sum of the decre- 
ments of ERAPR-1 and ERAPR-26 plus the address of ERAPR-3 
must always equal the address of CALPR-5. 

ERAPR-15 must be initialized by the modification program 
to indicate the number of records originally specified in 
ERAPR-27 that the modification program has determined are 
not to be written from Internal Sort Phase. These records are 
not written because they have been either summarized into 
another record or deleted. Just prior to returning to Sort, the 
sum of the address portion of ERAPR-15 and the decrement of 
ERAPR-27 must equal the number that was in the decrement 
of ERAPR-27 at the time the modification program was entered. 

Procedures: To summarize records, the following 
operations are performed by the modification program. 

1. The composite (summarized) record is put in the 
bin of one of the component records. 

2. If the check-sum option is specified, the check 
sum of the record is recomputed and placed in the last 
word of the bin. 

3. Tags indicating unused bins are moved to the 
bottom (toward sysend) of the tag table whose location 
is given in word erapr-i and whose length is given in 

CALPR-5. 



4. The tags between the bottom of the table and 
those being moved down are moved up to fill the inter- 
vening locations, providing space for those being 
moved down. 

5. The length of the tag table of records to be writ- 
ten, which is given in the decrement of erapr-27, is de- 
creased, and the tag table whose location is given in 
ERAPR-26 is updated (decremented) by the same 
amount. 

6. ERAPR-15 is initialized by the same amount used in 
operation 5. 

7. ERAPR-3 is increased by the same amount used in 
operation 5. 

To delete records, the preceding procedure must be 
followed, beginning with operation 3. 

To alter a record, the modification program must re- 
compute the check sum if the cksums option is speci- 
fied on the OPTION card. 

To lengthen or shorten a record, the modification 
program must put the new logical record in the first 
part of the bin currently occupied by the record being 
modified. Sort has made the length of this bin long 
enough to accommodate both a record as large as 
specified by the parameters associated with the length 
definer on the record control card and the equals 
and/or check-sum words if they are specified. The last 
two words are put into the bin by the modification 
program so that they immediately follow the modified 
record. If necessary, the modification program must 
recompute the check sum. 

For each use of this exit, the return is to 1, 4. 
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Figure 4. Exit XSM04 ( Fixed-Length Record Run) 
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Logical Condition at This Point: A group of sorted 
records are ready to be written onto a merge tape by 
the Internal Sort Phase. 

Possible Uses of XSM04: The xsmo4 exit may be 
used: 

1. To summarize records 

2. To delete records 

3. To alter records 

Parameter Locations: Key parameters at this point 
are located at: 

ERAPR-10, which contains in its address the location of a 
table used as a calling sequence to the write subprogram, PUT. 
The decrement of ERAPR-10 contains the length of this table. 
Each entry in this table causes the writing of one tape record 
consisting of sorted records from the Internal Sort Phase. The 
address of each entry in this table points to a list of tags. Each 
of these tags points to the beginning of one logical record. The 
decrement of each entry in the table specified by ERAPR-10 
indicates the length of the tag list giving the number of records 

ERAPR-17, which contains the number of words (in these 
records) that are to be written. 

ERAPR-4, which contains in its address the location of the 
Availability Table, following which the write subprogram 
(PUT) builds the Write Table. The decrement of ERAPR-4 
gives the current length of the Availability Table. The address 
portions of the words in the Availability Table indicate bins 
int o which records may be moved. 

Procedures: To summarize records, the modification 
program must put the composite record in the bins 
currently used by one of the records being sum- 
marized. The locations of the bins from which records 
are not to be written must be added to the Availability 
Table whose location is given in erapr-4. The length of 
this table must be updated. Tags (or pointers) indi- 
cating the beginnings of records which are not to be 
written out are not now required in the tables (or tag 
hsts) specified by the entries in the table indicated by 
ERAPR-10. Each of these tables must be closed up. They 
need not be contiguous, however, provided the entries 
indicated by erapr-io contain the correct locations and 
lengths of the tables. If the summarized record is not 
exactly the same length as the record it is replacing, 
the decrement of the last pointer (either the pointer to 
the first bin if the record is contained in one bin, or the 
pointer at the end of the next to the last bin) must be 
updated to reflect the exact number of words which are 
to be written from the bin to which it points. The 

noinfpr*; fn tbp -fircf Vn'nc nf oooln 1r>iTi/-.o1 Tar.r>.yA Ar^ -^^4- 

indicate the beginning of the bins, but rather the first 
word which is to be written on the merge tapes. The 
diflFerence (number of words) between the beginning 
of the bin and the word indicated by the pointer is the 
number of words into which the control fields are ex- 
tracted. This number is given by calpr-12. 

The process of deleting a record is similar to that of 
summarizing. The modification program must: put the 



locations of the bins not beins used into the Availabil- 
ity Table indicated by erapr-4; close up the tags speci- 
fying the records that are to be written; and update the 
table indicated by erapr-io. 

To alter a record, the decrements of the tag loca- 
tions indicating the continuation bins must indicate 
the exact number of words to be written from the next 
bin. Pointers to the continuation bins must point to the 
very first word of the bins. The number of words writ- 
ten from a continuation bin may be less than the capac- 
ity of a bin, but these words must be in adjacent words 
at the beginning of the bin. 

For each use of this exit, the return is to 1. 4, 
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Figure 5. Exit XSM04 (Variable-Length Record Run) 

Exit XSM06 (Fixed-Length Record Run with 
BUFFER Option) 

If the buffer option is not specified, the xsMoe exit is 
not provided. 

Logical Condition at This Point: A logical record is 
ready to be moved from the input buffer to a bin by 
the subprogram bufrd (Buffer Reading Routine). 

Possible Uses of XSM06: The xsMoe exit may be 
used: 

1. To keep a record from being deleted 

2. To insert or replace a record 

3. To delete a record 

Parameter Locations: Key parameters at this point 
are located at: 

ERAPR-4, which contains the location of the first word of 
the logical record which is ready to be moved from the bufi^er. 

ERAPR-5, which specifies the location of the bin to be used 
during the next move. 

RECPR-0, which gives the length of the logical record in the 
buffer. 

CNTPR-14, which contains the total number of logical rec- 
ords which either have been moved from the buffer to bins or 
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have been deleted by the DELETE subprogram ( or have been 
inserted by previously calling the modification program to insert 
a record). 

Index register 1, which gives the number of logical records 
which remain to be moved to bins to complete the current read 
request. This number is the total number of records requested, 
M (see CALPR-6), minus the number already moved during 
this call to BUFRD. 

Procedures: The normal return (i.e., with no records 
added or deleted) is to 1, 4. The record is then checked 
for deletion if the delete option is specified. To pre- 
vent this record from being checked for deletion when 
the DELETE option has been specified, the return should 
be to 2, 4. 

To insert a record, the location of the bin to use is 
given in the address portion of erapr-5. The modifica- 
tion program must move the record into this bin. The 
return is to 3, 4. 

To replace a record, the location of the bin to use is 
also given in the address portion of erapr-5. If the 
record is lengthened or shortened, it must be moved to 



the bin by the modification program. The location of 
the record in the bufiPer (given by erapr-4) must be 
updated to indicate the next logical record in the 
buffer. This is done by adding the address portion of 
RECPR-o to ERAPR-4, as showu by the following se- 
quence: 



CAL 


ERAPR-4 


ADD 


RECPR-O 


STA 


ERAPR-4 



The return is to 3, 4. 

To delete a record, return to 4, 4. bufrd then pre- 
pares to move the next logical record into the same bin. 

Exit XSM06 (Variable-Length Record Run) 

Logical Condition at This Point: A logical record is 
about to be moved from the input buffer to a bin by 
the subprogram get (Sort input routine for variable- 
length records). 
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Possible Uses ofXSMOG: The xsMoe exit maybe used: 

1. To insert or replace a record 

2. To delete a record 

Parameter Locations: Key parameters at this point 
are located at: 

ERAPR-23, which contains the location of the word in the 
input buffer immediately preceding the first word (i.e., the 
record control word which contains the length of the record) 
of the logical record that is to be moved from the buffer. 

ERAPR-25, which indicates the length (word count) of the 
current record. The word count, which includes the record con- 
trol word, is expressed in binary form and is in the address 
portion of ERAPR-25. 

ERAPR-21, which contains the location of the word preced- 
ing txiQ Cjurrent Avaixabiiity j.abie. x^ins are utilized beginning 
at the bottom of the table (toward SYSEND). Therefore, 
ERAPR-21 is essentially the base of the AvailabiHty Table. Bit 
20 of this location represents index register 1 and is a 1 ( repre- 
senting the on condition). 

ERAPR-22, which contains the 2's complement ( negative ) of 
the number of bins currently in the Availability Table. (The 
instruction 

LAC ERAPR-22, T 

puts the actual number in index register T.) The next bin loca- 
tion is easily determined by using the sequence 

LXA ERAPR-22, 1 

CLA* ERAPR-21 



When a record is to be inserted or replaced, location ERAPR- 
22 must be examined to determine whether enough bins are 
available to contain the record. If there are enough bins, the 
word at location ERAPR-22 must be updated by adding the 
actual number of bins used for the record. 

ERAPR-24, which contains the sequence number for the 
EQUALS option. If a record is inserted or replaced in a run 
which uses the EQUALS option, the contents of word EPvAPR- 
24 must be incremented by 1. The new value is put into the 
proper word in the first bin that the record occupies. 

CALPR-12, which indicates the number of core-storage lo- 
cations that must be left at the beginning of the first bin of the 
record in order to contain the extracted control fields. In runs 
which specify the EQUALS option, the equals word (sequence 
number) is put in the first location following the extracted 
control fields. If the CKSUM option is specified, the check sum 
is placed either in the location following the equals word if the 
EQUALS option is specified, or following the extracted control 
fields if the EQUALS option is not specified. The actual record 
follows the check-sum location. The record control word, which 
contains the length of the record, is the first word of the record. 
If neither the EQUALS nor the CKSUMS option is specified, 
the record control word follows the extracted control field area. 

CALPR-3, which contains the length of each bin. The first 
bin must contain: the extracted control fields; the equals word 
if specified; the check sum if specified; the first part of the 
logical record, including all control fields; and a word indicat- 
ing where the record is continued. Whenever a record spills 
over into another bin, the last word of the previous bin must be 
initiahzed to indicate the next bin. The address portion of the 
last word contains the location of the next bin, the decrement 
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contains the number of words of the record which are in the 
next bin, the prefix contains 4 (or MZE), and the tag contains 

0. The last word of the last bin contains all zeros. 

Procedures: The normal return (no records added or 
deleted) is to 1, 4. The record is moved and processed. 

To insert or replace a record when there are not 
enough bins available to contain the record, return to 
2, 4. The records already moved will be sorted. The 
modification program will be entered again with more 
available bins before another record is moved. 

To insert a record, die location(s) of the bin(s) to use 
can be found from erapr-2i and erapr-22. The location 
of the record to be moved can be found from erapr-23. 
The record must be placed in the bins by the modifica- 
tion program, erapr-25 must then be changed to reflect 
the length of the inserted record, and it must contain 
the count of words, including the record control word, 
in the logical record. The return is to 3, 4. 

To replace, lengthen, or shorten a record, the modifi- 
cation program must perform the same functions as 
when it inserts a record. In these cases the return is to 
4, 4. The return diflFers because the get subprogram 
must examine the next logical record in the buffer the 
next time a record is to be moved. 

To delete a record, increment cntpr-9 by 1 and re- 
turn to 5, 4. The subprogram get then examines the 
next logical record in the buffer. 

ExitXSMIO 

Logical Condition at This Point: A label has just 
been read from an input tape and the label subpro- 
gram has been entered to process the label. 

Possible Uses of XSMIO: The xsmio exit may be 
used: 

1. To perform extra checking on the label 

2. To change the label (in case of nonstandard 
labels) 

3. To delete label checking 

Parameter Locations: Key parameters at this point 
are located at: 

LABPR-0, which contains the location of a 20-word area into 
which the label has been read. Index register 2 contains the 
complement of this location. It must be restored if the return 

1, 4 is used. 

The accumulator, which contains the location of the unit 
control block for the unit from which the label was read. The 
sign of the accumulator is plus if a standard label is specified 
on the input FILE card and the input tape label is 84 charac- 
ters long; it is minus if the label is 120 characters long. The 
accumulator must be restored if return 1, 4 is used. 

The sense indicators, which contain the location of the file 
data block for the file on which the label occurs. They must be 
restored if return 1, 4 is used. 

Index register 1, which contains either a 3 if the label is a 
header label or a 4 if it is a trailer label. 

Procedures: To continue the label processing routine, 
the return is to 1, 4. 



To delete label processing, the return is to 2, 4. 
To reread the label and re-enter the modification 
program, the return is to 3, 4. 



Exit MPM04 

Logical Condition at This Point: The control field of 
the current record is equal to the control field of the 
previous record during a Merge Phase pass. 

Possible Uses of MPM04: The mpmo4 exit may be 
used: 

1. To modify the current record 

2. To delete the current record 

3. To summarize the current record into the previ- 
ous record 
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are located at: 



Key pEiaiiieteis at tiiis point 



The address portion of the accumulator, which contains the 
location of the first word of the previous logical record. During 
a variable-length record run, this v^ord is the record control 
word. 

The decrement portion of the accumulator, which contains 
the location of the first word of the current logical record. Dur- 
ing a run involving variable-length records, this word is the 
record control word. 

During a run involving variable-length records, ERAPR-3 
and ERAPR-4 contain, respectively, the locations of words 
indicating the lengths of the previous record and current record. 

During a run of fixed-length records, the logical record length 
is given in CALPR-9. 

Procedures: If the current record is to be retained, 
the return is to 1, 4, 

To delete the current record, the return is to 2, 4. 
This return may also be used when the current record 
has been summarized into the previous record. If the 
current record has been summarized into the previous 
record and if the cksums option is specified, the modifi- 
cation program must recompute the check sum of the 
modified record. It is not possible to change the length 
of a record during Merge Phase. 



Two Records 

Have Equal 

Control Fields 





' 


Yes ^ 


MPM04 


^/^ MOD^^ 


Keep 

Record 


Summarize 

or 

Delete 


"^^^ MPM04^^ 




No 


^ 




1,4 


Record 
2,4 










' 


' 








Put Location of 




Record in 








Write 


Table 








1 


•* 













Figure 9. Exit MPM04 

Exit FMM02 

Logical Condition at This Point: The control field of 
the current record is equal to the control field of the 
previous record during the Final Merge Phase. 



fUSSlULe Uses of r lyliviuz: Luc j^mmOz exit iiicty ue 
used: 

1. To summarize the current record into the previ- 
ous record 

2. To delete the current record 

Parameter Locations: Key parameters at this point 
are located at: 

ERAPR-14, which contains the location of the first word of 
the current internal logical record. During a ran of variable- 
length records, the nature of this word depends on the option(s) 
specified. If either the EQUALS option or both the EQUALS 
and CKSUMS options are specified, the word is the equals 
word. If the CKSUMS option (but not the EQUALS option) is 
indicated, the word is the check-sum word. If neither the 
EQUALS nor the CKSUMS option is specified, the word is the 
record control word (which contains the record length). 

ERAPR-15, which contains the location of the first data word 
of the current logical record. During a run of variable-length 
records, this word is the record control word. For a run of fixed- 
length records, ERAPR-14 and ERAPR-15 contain the same 
information because the equals and/or check-sum words are 
appended to the end of the logical record. 

ERAPR-20, which contains the location of the first word of 
the pre\'ious logical record, which has already been moved to 
the output buffer. The equals and check-sum words have al- 
ready been deleted from the record if the EQUALS and 
CKSUMS options were specified. 

During a run of variable-length records, ERAPR-12 contains 
the length of the previous logical record and the accumulator 
contains the length of the current logical record. 

During a run of fixed-length records, CALPR-9 contains the 
length of each logical record, including the equals and/or check- 
sum words if the proper options have been specified. 

ERAPR-21 which contains the location in the buffer into 
which the current record will be put if it is not deleted or 
summarized into the previous record. 
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Procedures: To delete the current record, the return 
is to 1, 4. When the current record is summarized into 
the previous record, the summarizing may cause short- 
ening of the record during a run of variable-length 
records. In this case, the record-length control word 
(indicated by erapr-2o) must be changed. The location 
of the space for the next record in the buffer (indicated 
by ERAPR-21) must be updated (i.e., decremented by 
the number of words by which the record has been 
shortened). The return is to 1, 4. 

If the current record is to be retained, the return is 
to 2, 4. 

Exit FMM04 

Logical Condition at This Point: A record has been 
chosen for moving to the output buffer. Its check sum, 
if present, has not been checked, and the record has 
not yet been checked for deletion if the delete option 
is specified. 

Possible Uses of FMM04: The fmmo4 exit may be 
used: 

1. To delete the record 

2. To alter the record 

Parameter Locations: Key parameters at this point 
are located at: 

ERAPR-14, ERAPR-15, and CALPR-9, which contain the 
same information as described for Exit FMM02. 

ERAPR-12, which contains the length of the logical record 
during a run of variable-length records. 

ERAPR-2, which contains the number of words in the current 
output block. This number includes the record to be moved. 

Procedures: To delete this record, erapr-2 must be 
decremented by the contents of erapr-12. The return is 
to 1, 4. 

To retain the record, the return is to 2, 4. If the rec- 
ord is altered and the cksums option specified, the 
sum must be recomputed if necessary. It is not possible 
to alter the length of a logical record at this point. 

ExitFMMIO 

Logical Condition at This Point: Either a label has 
just been read from an external input tape during a 
straight merge run or the merge portion of a sort-and- 
merge run, or a label is about to be constructed for 
writing on a final output tape. 

Possible Uses of FMMIO: The fmmio exit may be 
used: 

1. To perform extra checking of the label 

2. To construct the label in a different fashion 

3. To change the label 

4. To delete label checking 

Parameter Locations: Key parameters at this point 
are located at: 



LABPR-0, which contains the location of a 20-word area into 
which the label has been read or in which the label is going to 
be constructed. Index register 2 contains the complement of 
this location. The register must be restored if return 1, 4 is used. 

The accumulator, which contains the location of the unit 
control block for the unit from which the label was read or on 
which the label is to be written. The accumulator sign is plus if 
a standard label is specified on the input FILE card and the in- 
put tape label is 84 characters long, or if a standard label is 
specified on the output FILE card and the label to be written 
is 84 characters long. The sign is minus if either label is 120 
characters long. The accumulator must be restored if return 
1, 4 is used. 

The sense indicators, which contain the location of the file 
data block for the file on which the label occurs. They must be 
restored if return 1, 4 is used. 

Index register 1, the content of which varies as follows, 
depending on the operation being performed: 

It is a 3 if a header label is to be checked. 

It is a 4 if a trailer label is to be checked. 

It is a 5 if a header label is to be constructed. 

It is a 6 if an end-of-reel trailer label is to be constructed. 

It is a 7 if an end-of-file trailer label is to be constructed. 

Procedures: To continue with label checking or label 
construction, the return is to 1, 4. 

To delete label checking, the return is to 2, 4. 

To cause the label to be reread and the modification 
program to be re-entered, the return is to 3, 4. 

To delete label construction, the return is to 3, 4. 
The label constructed by the modification program will 
be written. 
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Chapter 7. Sort Messages 



The messages given below supply the programmer and 
the operator with information pertinent to errors which 
may occur during the running of a 7090/7094 Sort job. 
Many of these messages appear on-line, and they all 
appear oflF-line unless either the nof field is specified 
on the OPTION card, a sysoui unit is not attached, or 
the message occurs during a routine that is servicing a 
channel trap. 

Following each message is an explanation of the 
reason for its occurrence and the action(s), if any, 
which may be taken by the operator. When the nature 
of the message permits two or more options for the 
operator, the actions are listed with a numeral prefix. 

In the messages, notations such as xx, xxx, and 
xxxxx, represent actual values of one to five digits in 
length that appear when a given message is printed. 

*CK01 UNIT XX (UNRT) EOT. CHANGE TAPE. 

Explanation: The end-of-tape marker was sensed while 

SYSCK2 was being opened. This indicates a very short 

tape. 

Action: After Sort unloads tape, make another tape 

ready. Sort reselects the unit. 
*CK02 UNIT XX. EOT WRITING DICTIONARIES. 

CHANGE TAPE. PRESS START FOR RESTART. 

OPERATOR ACTION PAUSE. 

Explanation: The final output tape is too short to ac- 
commodate the entire 9PAC Dictionary. The dictionary 

has been saved from the input tape and is being written 

on the output tape. 

Action: After Sort unloads the tape, mount a longer work 

tape. Then press START. 
*CS02 CKSUM ERROR, RECORD, LOG XXXXX 

PRESS START TO GO ON. 

Explanation: A logical record check sum does not check 

properly. The record is dumped. This message can occur 

only during the Merge Phase. 

Action: Press START to continue. Processing continues 

with the next logical record. 
*CS03 CKSUM ERROR, RECORD, LOG XXXXX 

PRESS START TO GO ON. 

Explanation: A logical record check sum does not check 

properly. The record is dumped. This message can occur 

only during the Final Merge Phase. 

Action: Press START to continue. Processing continues 

with the next logical record. 
*EP01 FOLLOWING ERRORS FOUND IN CONTROL 
CARDS XXXXX XXX XX XXXXX ETC. 

SORT DELETED. 

Explanation: Sort cannot continue. Control returns to the 

IBSYS System Monitor. The message provides the code 

number of each of the control card errors found. An 

explanation of each code number is given below. 

*E001 An error was found while a control card read 
from the card reader was being converted from 
card image to BCD format. 

*E002 A read error, or redundancy, was encountered 
while reading a control card. 



*E003 



Some control card has been included more than 
the allowable number of times. The Hmits 
given below are for the number of statements 
allowed for each sort and/or merge run. Each 
statement may use one or more continuation 
cards. 



*E004 
*E005 

'E006 

*E007 

*E008 

*E009 
*E010 

*E011 
'E012 



*E013 
*E014 



*E015 

*E016 
*E017 

*E018 
*E019 



STATEMENT 

CHANNELS 

DELETE 

FILE 

LABEL 

MERGE 

MODIFICATION 

OPTION 

OVERFLOW 

RECORD 

RESTART 

SORT 



NXIMBER OF TIMES 
PERMITTED 
1 
100 
9 
1 
1 

50 
1 
1 
1 
1 
1 



There is no CHANNELS card; one is required. 
The INPUT parameter has not been cor- 
rectly specified on the CHANNELS card. 
There are no FILE cards. Both an input FILE 
card and an output FILE card are required. 
BLOGKSIZE has not been correctly specified 
on one or more of the FILE cards. 
The GKSUMS and/or BLKSEQ fields have 
been specified on a FILE card on which deci- 
mal mode has also been specified. This is in- 
valid. 

The densities for the DICTIONARY and the 
LABEL on a FILE card differ. 
Either one of the FILE cards is missing or one 
of the FILE cards did not have INPUT or 
OUTPUT specified. 

Two or more output FILE cards have been 
included; only one is allowed. 
The MODE parameter has not been correctly 
specified on an input FILE card. All input files 
must be in the same mode. 
There is no RECORD card; one is required. 
The LENGTH parameters have not been cor- 
rectly specified on the RECORD card. A length 
must be given. No more than three lengths are 
allowed. The input length must not exceed the 
input block size. In a Sort of fixed-length rec- 
ords, the output length must not exceed the 
output block size. 

The FIELD parameters have not been cor- 
rectly specified on the RECORD card. The 
fields may not exceed the record length. In- 
correct parameters are not allowed. 
The FIELD parameter has not been correctly 
specified on the DELETE card. 
The parameter of the FIELD definer specified 
for deletion on the DELETE card has not been 
specified on the RECORD card. 
The IDENT parameter has not been correctly 
specified on the DELETE card. The identifi- 
cation length must equal the control field 
length. A check for invalid binary or octal char- 
acters should be made. 

The MERGE parameters have not been cor- 
rectly specified on the CHANNELS card. 
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*E020 There is no SORT or MERGE card; one is 
required. 

*E021 The ORDER parameter has not been correctly 
specified on the SORT or MERGE card. A 
merge order which is not less than two nor 
greater than eight must be specified. 

*E022 The FILE parameter has not been correctly 
specified on the SORT or MERGE card. In 
order to be sorted, the file must be designated 
by a FILE card. There should be no FILE 
cards for files not mentioned on the SORT or 
MERGE cards. 

*E023 The ORDER parameter has not been correctly 
specified on the SORT or MERGE card. For a 
merge run, the merge order must equal the 
number of files to be merged. For a sort-and- 
merge run, it must be at least one greater than 
the number of external files to be merged in 
during the Final Merge Phase. 

*E024 For a run of fixed-length records, the record 
length is not a factor of block size. The input 
record length must be a factor of the input 
block size, and the output record length must 
be a factor of the output block size. 

*E025 The number of merge files is greater than the 
merge order. 

*E026 The FIELD parameters have not been cor- 
rectly specified on the SORT or MERGE card. 
They must correspond to FIELD parameters 
specified on the RECORD card. 

*E027 There is no available unit for output on the 
output channel. 

*E028 The number of input units specified for the 
input to a merge-only run does not equal the 
merge order. 

*E029 The utility tape requested for input is not at- 
tached. 

*E030 The input channel specified for a merge-only 
run is not one of the channels specified for 
merging. 

*E031 There are not enough units available on the 
input channel to be assigned to the input 
function. 

*E032 There are not enough units available on the 
merge channels to be assigned to the merge 
function. 

*E033 A required parameter has not been specified on 
a control card. 

*E034 Too many fields have been specified on a con- 
trol card. 

*E035 An invalid field has been specified on a con- 
trol card. 

*E036 The same field has been specified more than 
once on a control card. 

*E037 A parameter required by a field on a control 
card has been omitted. 

*E038 An invalid parameter has been specified on a 
control card. 

*E039 The parameter for the RELCOM field on the 
OPTION card is 10,000 or more. This may not 
allow enough room for sorting. 

*E040 The IDENT parameter has not been correctly 
specified on the LABEL card; an H is required. 

*E041 The IDENT parameter has not been correctly 
specified on the LABEL card; it must be at 
least 18 and not more than 120 characters in 
length. 

*E042 The MERGE parameters have not been cor- 
rectly specified on the CHANNELS card. Ex- 
actly two merge channels must be given. 

*E043 The OUTPUT parameter has not been cor- 
rectly specified on the CHANNELS card. 



*E044 The MODE parameter nas not been correctly 
specified on a FILE card. 

*E045 The DENSITY parameter has not been cor- 
rectly specified on a FILE card. 

*E046 The DICTIONARY parameter has not been 
correctly specified on a FILE card. 

*E047 The INPUT parameter has not been correctly 
specified on the input FILE card. An input 
file number must be given. 

*E048 The BLOCKSIZE parameter has not been cor- 
rectly specified on a FILE card. 

*E049 The PADDING parameter has not been cor- 
rectly specified on the output FILE card. 

*E050 The LABEL parameter has not been correctly 
specified on a FILE card. 

*E051 The CHECKPOINT parameter has not been 

, ^„i.1,, „_, ^.•X!-,J "-- J-Tt- - J- 'CTT TT" „«_J 

cOiieuLiy apc^iucu. Oiji lUo iiiyuL -i' ii-iin i;aj.u.. 

*E052 The PROGRAM parameter has not been cor- 
rectly specified on the MODIFICATION card. 

*E053 The LOCATION parameter has not been cor- 
rectly specified on the MODIFICATION card. 

*E054 The FORMAT parameter has not been cor- 
rectly specified on the MODIFICATION card. 

*E055 The TYPE field has not been correctly specified 
on the RECORD card. 

*E056 Too many fields have been specified on the 
RECORD card. 

*E057 Control fields of records in BCD mode are 
not a multiple of six bits in length. 

*E058 The SEQUENCE field has not been correctly 
specified on the SORT or MERGE card. 

*E059 The commercial collating sequence has been 
requested, but the control fields are not a multi- 
ple of six bits in length. 

Action: No operator action is required for any of the 

above. 
*EP02 NO END CARD FOUND BEFORE EOF. 

TO DELETE SORT, PUT SS3 UP, START. 

TO CONTINUE AND IGNORE ERROR, PUT SS3 
DOWN, START. 

END CARD WILL BE ASSUMED AT THIS POINT. 

OPERATOR ACTION PAUSE. 

Explanation: The deck of cards in the card reader is 

incomplete; it lacks the END card for Sort and the 

IBSYS control cards that should follow the Sort control 

cards. 

Action: The operator can take one of the following two 

actions : 

1. If deck contains all required Sort control cards, set 
sense switch 3 down and press START. 

2. If Sort deck is incomplete, set sense switch 3 up and 
press START. Sort then returns control to the IBSYS 
System Monitor, which pauses. During pause, provide 
required IBSYS control cards in card reader. 

*EP03 NOT A SORT CONTROL CARD. 

TO DELETE SORT, PUT SS3 UP, START. 

TO CONTINUE AND IGNORE ERROR, PUT SS3 

DOWN, START. 
THE CARD WILL BE IGNORED. 
OPERATOR ACTION PAUSE. 

Explanation: Sort has read a card that is not a Sort con- 
trol card. 

Action: The operator can take one of the following two 
actions : 

1. To delete Sort, set sense switch 3 up and press 
START. 

2. To ignore the card, set sense switch 3 down and 
press START. 

*EP04 NO SYSCK2 ATTACHED. 

Explanation: No SYSCK2 is attached, and either the 
NOF option has been taken or no SYSOUl is attached. 
Sort assumes that the NOCKPT option has been taken. 
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sets the internal switch indicating that neither diction- 
aries nor unreadable records will be saved, and continues. 
Action: No operator action is required. 
*EP05 INTERSYSTEM INPUT UNIT NOT FOUND. 
TO DELETE SORT, PUT SS3 UP, START. 
TO HAVE SORT ASSIGN AN INPUT UNIT, PUT SS3 

DOWN, START. 
OPERATOR ACTION PAUSE. 

Explanation: Sort cannot locate the intersystem reserve 
unit specified for input by the CHANNELS control card. 
Action: The operator can take one of the following two 
actions: 

1. If the reel(s) of tape containing input is known, set 
sense switch 3 down and press START. Sort then 
assigns an input unit and prints the unit number on- 
line as part of message *EP06. 

2. If tape reel containing input is not known, delete 
Sort by setting sense switch 3 up and pressing START. 

*EP06 PREPARE UNITS AS FOLLOWS— 
UNIT XX (FUNCTION) 
UNIT XX (FUNCTION) 
ETC. 
PRESS START WHEN ALL UNITS ARE 
PROPERLY PREPARED AND IN 
READY STATUS. 
OPERATOR ACTION PAUSE. 

Explanation: The tapes table is printed on-Hne if the 
TAPES option is specified. The units are listed in the 
order in which they are used by Sort. 

Each 729 tape unit is checked for ready status; if a 
unit is not ready the message 

NOT IN READY STATUS 
is printed after the function of the unit. Hypertape 
units are not checked for ready status. 
Action: Ready units properly and press START. 
*IN01 UNIT XX EOF INPUT REEL. LOAD NEXT 
REEL ON UNIT XX. 
Explanation: The input reels are to be switched. 
Action: If unit containing next reel is not ready, make it 
ready during pause provided by Sort. 
*IN02 UNIT XX TRAILER LABEL UNREADABLE. IF 
MORE REELS, SET SS3 DOWN. 
IF NO MORE REELS, SET SS3 UP— PRESS START. 
OPERATOR ACTION PAUSE. 

Explanation: The label, which controls the number of 
input reels, is unreadable. 

Action: The operator can take one of the following two 
actions : 

1. If there is another reel of input, set sense switch 3 
down and press START. 

2. If there are no more input reels, set sense switch 3 up 
and press START. 

*LB01 UNIT XX, LABEL ERROR. LABEL IS 
X X X X X X 

V Y Y Y Y Y 

PUT SS4 DOWN TO IGNORE LABEL, PUT SS4 UP 

TO RETRY, PRESS START. 
OPERATOR ACTION PAUSE. 

Explanation: Sort has found that the header label read 
from SYSCK2 at restart time is in error. The label that 
Sort vrates on SYSCK2 contains the name SORT 
SYSCK2. 

Action: The operator can take one of the following two 
actions. 

1. If tape on unit attached as SYSCK2 contains Sort 
checkpoint, set sense switch 4 down and press START. 

2. If tape does not contain checkpoint, mount correct 
tape on unit attached as SYSCK2, set sense switch 4 
up, and press START. 

*LB02 UNIT XX BLKCNT ERROR. 

Explanation: The trailer label record count does not 
match the count of blocks on the input tape. 
Action: No operator action is required. 
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*LB03 UNIT XX, LABEL ERROR. LABEL IS 

X X X X X X 

X X X X X X 
PUT SS4 DOWN TO IGNORE LABEL. PUT SS4 UP 

TO RETRY. PRESS START. 
OPERATOR ACTION PAUSE. 

Explanation: The name on the input file label does not 
match the name on the input FILE card. 
Action: The operator can take one of the following two 
actions. 

1. If wrong tape has been mounted, mount correct tape, 
set sense switch 4 up, and press START. 

2. To ignore label, set sense switch 4 down and press 
START. (Note that because indicators for mode, 
density, and check-sum block-sequence word from 
label override indications of input FILE card, care 
should be taken when label is ignored.) 

*LB04 UNIT XX, LABEL ERROR. LABEL IS 

X X X X X X 

X X X X X X 
PUT SS4 DOWN TO IGNORE LABEL. PUT SS4 UP 

TO RETRY, PRESS START. 
OPERATOR ACTION PAUSE. 

Explanation: The file serial number on the input file 
label does not match the number on the input FILE 
card. 

Action: The operator can take one of the following two 
actions : 

1. If wrong tape has been mounted, mount correct tape, 
set sense switch 4 up, and press START. 

2. To ignore label, set sense switch 4 down and press 
START. ( Note that because indicators for mode, den- 
sity, and check-sum block-sequence word from label 
override indications of input FILE card, care should 
be taken when label is ignored.) 

*LB05 UNIT XX, LABEL ERROR. LABEL IS 

X X X X X X 

X X X X X X 
PUT SS4 DOWN TO IGNORE LABEL. PUT SS4 UP 

TO RETRY, PRESS START. 
OPERATOR ACTION PAUSE. 

Explanation: The reel sequence number on the input file 
label does not match the number on the input FILE 
card. 

Action: The operator can take one of the following two 
actions. 

1. If wrong tape has been mounted, mount correct 
tape, set sense switch 4 up, and press START. 

2. To ignore label, set sense switch 4 down and press 
START. ( Note that because indicators for mode, den- 
sity, and check-sum block-sequence word from label 
override indications of input FILE card, care should 
be taken when label is ignored.) 

*LB06 UNIT XX, LABEL ERROR. LABEL IS 
X X X X X X 

V V Y Y Y Y 

PUT SS4 DOWN TO IGNORE LABEL. PUT SS4 UP 

TO RETRY, PRESS START. 
OPERATOR ACTION PAUSE. 

Explanation: The name of the intermediate merge tape 
label does not match the name expected in the label. 
Action: The operator can take one of the following two 
actions : 

1. If tape on unit is one just created by Sort, set sense 
switch 4 down and press START. 

2. If a Sort restart, make certain that tapes are mounted 
correctly. Then set sense switch 4 up and press 
START. 

*LB07 UNIT XX, LABEL ERROR. LABEL IS 
X X X X X X 
X X X X X X 
PUT SS4 DOWN TO IGNORE LABEL. PUT SS4 UP 

TO RETRY, PRESS START. 
OPERATOR ACTION PAUSE. 



Ex'i^ldPMtiQTi: The header label on the in^ut *"a"'* J^.^o 

not have the proper first word ( IHDR). 

Action: The operator can take one of the following two 

actions: 

1. If proper tape has been mounted, set sense switch 4 
down and press START. 

2. If proper tape has not be mounted, mount correct 
one, set sense switch 4 '^^ nr.A -r-.^ooc cta'dt 

*LB08 UNIT XX, LABEL ERROR.^LABEL is" ""'"'" 

X X X X X X 

X X X X X X 
PUT SS4 DOWN TO IGNORE LABEL. PUT SS4 UP 

TO RETRY, PRESS START. 
OPERATOR ACTION PAUSE. 

Explanation: The trailer label on the input tape does not 
have the proper first word ( either lEOR or lEOF). 
Action: The operator can take one of the following 
actions: 

1. To ignore label, set sense switch 4 down and press 
START. 

2. To read and check label again, set sense switch 4 up 
and press START. 

*LD01 UNIT XX HAS PROGRAM(S) MISSING 

XXXXXX MISSING FROM ABOVE UNIT. 

TO DELETE SORT SS3 UP 

TO GO ON SS3 DN 

OPERATOR ACTION PAUSE. 

Explanation: One or more Sort subprograms cannot be 

found and loaded from the IBSYS system unit. 

Action: The operator can take one of the following two 

actions : 

1. To delete Sort, set sense switch 3 up and press 
START. Sort prints 

SORT DELETED 
and returns control to the IBSYS System Monitor. 

2. To continue loading without the missing subpro- 
gram(s), set sense switch 3 down and press START. If 
the missing subprogram(s) is called. Sort is deleted 
and a core dump is automatically taken. 

*LD02 CKSM ERROR LOADING XXXXXX 
PRESS START TO GO ON. 
Explanation: A check-sum error has occurred while a 
Sort subprogram was being loaded. 

Action: The operator can take one of the following two 
actions : 

1. To ignore check-sum error, press START. 

2. To terminate run with a dump, execute manual trans- 
fer to location llSg. 

*LD03 CONTROL PROGRAM MISSING, XXXXXX 
PRESS START TO DELETE SORT. 
OPERATOR ACTION PAUSE. 

Explanation: The main subprogram of a phase cannot be 
found and loaded from the system unit. 
Action: The operator can take one of the following two 
actions : 

1. To return control to IBSYS System Monitor, press 
START. Sort prints 

SORT DELETED 

2. To terminate run with a dump, execute manual 
transfer to location 11 Ss. 

*LE03 COUNTS OF RECORDS DO NOT AGREE. THE 

COUNTS ARE AS FOLL'^^^'^'^ 

READS WRITEs'^'duMPED 
XX XX XX 

**OPTIONS*« SS3 SS4 

TO DELETE SORT UP UP 

TO RETURN TO LAST CKPT . UP DN 

TO GO ON (IGNORE) DN UP 

OPERATOR ACTION PAUSE. 

Explanation: The count of the records written and/or 

dumped due to bad check sums during this pass of 

Merge Phase does not agree with the count of records 

read: 



action: xiie operator can taxe one of the following three 
actions : 

1. To delete Sort, set sense switches 3 and 4 up and 
press START. 

2. To return to last checkpoint if one was taken and 
if this option is given, set sense switch 3 up, set sense 
switch 4 down, and press START. 

3. lo Ignore error and continue merging those records 
written during this pass, set sense switch 3 down, set 
switch 4 up, and press START. 

*LE04 NO READ AREAS AVAILABLE 

**OPTIONS** SS3 SS4 

TO DELETE SORT UP UP 

TO RETURN TO LAST CKPT UP DN 

OPERATOR ACTION PAUSE. 

Explanation: To continue. Merge Phase must read a rec- 
ord from a merge tape. However, there are no buffers 
available into which records can be read. When this stop 
occurs, it is probably due to a machine error. 
Action: The operator can take one of the following two 
actions : 

1. To delete Sort, set sense switches 3 and 4 up and 
press START. 

2. To return to last checkpoint if one was taken and 
if this option is given, set sense switch 3 up, set sense 
switch 4 down, and press START. 

*LE05 

Explanation: The DEBLK subprogram has been entered 
to dump an unreadable record, but a word count of 
zero is given, indicating a possible program or machine 
error. 

Action: No operator action is required. To determine if 
any rec-ords were dropped, the programmer should com- 
pare the output record counts with the input counts. 

*LE 10 ERROR, LOG. XX 

**OPTIONS** SS3 SS4 

TO DELETE SORT UP UP 

TO RETURN TO LAST CKPT UP DN 

TO GO ON (IGNORE) DN UP 

Explanation: A logical error has been found at location 
XX. Using the listing and the load address of the Final 
Merge Phase found in the map, the user can determine 
the logical error. In some cases, the option TO GO ON 
is not given. If no checkpoints have been taken, the 
option TO RETURN TO LAST CKPT is not given. 
Action: The operator can take one of the following four 
actions : 

1. To delete Sort, set sense switches 3 and 4 up and 
press START. This is the normal action. 

2. To restart at last checkpoint if one was taken, set 
sense switch 3 up, set sense switch 4 down, and press 
START. For a long Sort run, this might be the op- 
tion taken. 

3. To ignore error and continue, set sense switch 3 down, 
set sense switch 4 up, and press START. ( This option 
is not recommended.) 

4. To terminate run with a dump, execute a manual 
transfer to location llSs. 

*MR01 UNIT XX TO BE USED FOR MERGING. 

LOAD THIS UNIT W^TH A SCRATCH TAPE. 

OPERA 1 Ok AuTION PAUSE. 

Explanation: Unit XX, which was used for input, is now 

to be used for merging. Depending upon programmer 

specifications. Sort either has rewound or has rewound 

and unloaded the tape. 

Action: The operator can take one of the following two 

actions: 

1. If Sort has unloaded the input tape, it does not pause. 
Mount a work tape and make it ready. Sort selects 
unit and continues. 

2. If Sort has not unloaded input tape, it pauses. Mount 
a work tape and make it ready. Then press START. 
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*MR02 UNIT XX LOAD NEXT REEL OF MERGE 
FILE YY. 
OPERATOR ACTION PAUSE. 

Explanation: The next reel of an external merge file con- 
tained on more than one reel must be loaded. Depending 
upon programmer specifications, Sort either has rewound 
or has rewound and unloaded the tape. 
Action: The operator can take one of the following two 
actions. 

1. If Sort has unloaded previous tape, it does not pause. 
Mount and make ready next tape. Sort selects unit 
and continues. 

2. If Sort has not unloaded previous tape, it pauses. 
Mount and make ready next tape. Then press START. 

*MR03 EOT WRITING HEADER LABEL— CHANGE 

TAPE. 
OPERATOR ACTION PAUSE. 

Explanation: The merge tape is too short to contain the 
header label and end-of-file mark. Sort unloads the tape. 
Action: Replace tape with longer work tape. When this 
tape is ready, press START. 
*MR04 ALL INPUT TAPES TO PHASE 2 ARE AT END 

OF FILE 
**OPTIONS** SS3 SS4 

TO DELETE SORT UP UP 

TO RETURN TO LAST CKPT UP DN 

Explanation: None of the merge tapes have records on 
them when the phase begins. 

Action: The operator can take one of the following two 
actions : 

1. To delete Sort, set sense switches 3 and 4 up and 
press START. 

2. To return to last checkpoint if one was taken and if 
this option is given, set sense switch 3 up and sense 
switch 4 down. Then press START. 

*MR05 MERGE TAPES TOO SHORT 

**OPTIONS** SS3 SS4 

TO DELETE SORT UP UP 

TO RETURN TO LAST CKPT UP DN 

TO GO ON (IGNORE) DN UP 

OPERATOR ACTION PAUSE. 

Explanation: All merge output tapes are at end of tape. 

Sort can continue properly only if longer merge tapes 

are used in a rerun. 

Action: The operator can take one of the following three 

actions: 

1. To delete Sort, set sense switches 3 and 4 up and 
press START. 

2. To return to last checkpoint if one was taken and if 
this option is given, set sense switch 3 up, set sense 
switch 4 down, and press START. 

3. To ignore error and to continue, set sense switch 3 
down, set sense switch 4 up, and press START. 
Note: Options 2 and 3 are not recommended. 

*OU01 UNIT XX CLOSING OUTPUT REEL NO. XXXX. 

Explanation: An output reel is being closed. The first 
reel may be other than reel number 1 if a reel sequence 
number has been specified on the output FILE card. 
Action: If reel is to be saved rather than used for a suc- 
ceeding run during the same job, remove it from unit. 

*OU02 UNIT XX MAKE READY FOR NET OUTPUT 
REEL 
WHEN BLANK REEL IS LOADED-PRESS START. 
OPERATOR ACTION PAUSE. 
Explanation: Unit XX is to be used for output. 
Action: Make unit ready to receive output, and press 
START. 

*OV01 CAPACITY REACHED 

OVERFLOW, BLOCKS/XXXXX 

TO STOP INPUT SS3 UP 

TO KEEP READING SS3 DN 

OPERATOR ACTION PAUSE. 



Explanation: The capacity of Sort, calculated on the 
basis of full reels of tape, has been reached. The reading 
of more input records may cause the merge to be un- 
ending. 

Action: The operator can take one of the following two 
actions : 

1. To stop reading and to continue with records already 
read, set sense switch 3 up and press START. (Note 
that the remaining input can be sorted at a later time 
using same control information and using OVER- 
FLOW card as specified in message.) 

2. If it is known that very few logical records remain on 
input reel, set sense switch 3 down and press START. 
(Note that this may cause an unending merge.) 

*RD01 UNIT XX FILE XX, RECORD XX 
UNRDBL BLK DUMPED YYYYY. 

Explanation: An ofi^-size or redundant block has been 
read by one of the READ subprograms of the Internal 
Sort Phase. It cannot be processed and has been written 
out for user examination. YYYYY is the length of the 
block. When variable-length records are being read, this 
message will not appear off-line. 
Action: No operator action is required. 

*RD02 UNIT XX FILE XX, RECORD XX 
INPUT CHKSM ERROR. 

Explanation: The folded IOCS check sum in the last 
word of tape record XX did not check properly. How- 
ever, the block is accepted. This message will not appear 
oif-line. 
Action: No operator action is required. 

*RD03 INPUT BLOCK SEQ ERROR— XX 

Explanation: The block-sequence number in the last 
word of block XX did not agree with the count in the 
unit control block. The unit control block is changed. 
This message will not appear off-line. 
Action: No operator action is required. 

'RD04 FILE XX, REC XX OFSZ XX WORDS. 

Explanation: An off-size block has been read by the 
Merge Phase or Final Merge Phase. It is being dumped. 
Action: No operator action is required. 

"RD05 UNRDBL BLK DUMPED 
XXXX WORDS. 

Explanation: An off-size or redundant block has been 
read by the Merge Phase. It cannot be processed and 
has been written out for user examination. 
Action: No operator action is required. 

*RD06 UNRDBL BLK DUMPED 
XXXX WORDS. 

Explanation: An off-size or redundant block has been 
read by the Final Merge Phase. It cannot be processed 
and has been written out for user examination. 
Action: No operator action is required. 

*RD07 BLKSEQ ERROR-UCW3 CHGD FROM XX TO XX 

Explanation: An external file being merged during the 
Final Merge Phase contains a block in which the block 
count in the check-sum block-sequence word does not 
agree with the count in the unit control block. The unit 
control block count is changed. This message will not 
appear off-line. 
Action: No operator action is required. 

*RD08 UNIT XX RECORD NO. YY 
CKSUM ERROR 

Explanation: The folded IOCS check sum in the last 
word of tape record YY read as external input during 
the Final Merge Phase did not check properly. However, 
the block is accepted. This message will not appear off- 
line. 
Action: No operator action is required. 

*RD09 BLKSEQ ERROR-UCW FROM XX TO XX. 

Explanation: The Internal Sort Phase or Merge Phase 
has written an internal file containing a block in which 
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unit control block. The unit control block count is 
changed. This message will not appear oflF-Hne. 
Action: No operator action is required. 
*RD10 UNIT XX APPEARS TO HAVE MALFUNCTIONED. 
PRESS START TO DELETE SORT. 
OPERATOR ACTION PAUSE. 

tion on Hypertape drive XX did not signal a normal 
read or an error condition. Sort cannot continue. 
Action: To delete Sort, press START. 

*RD11 UNIT XX, FILE XX, RECORD XX 
LONG ELK ACCEPTED. 

Explanation: A block that is longer than the length 
specified on the input FILE card has been read by the 
Internal Sort Phase. It is accepted. This message will 
not appear off-line. 
Action: No operator action is required. 

*RP01 SORT INTERRUPT REQUESTED. 

1. LABEL AND SAVE ALL TAPES FOR A LATER 
RESTART. THEN PRESS START. 

2. IF SORT IS TO CONTINUE— RESET SS2 AND 
PRESS START. 

OPERATOR ACTION PAUSE. 

Explanation: Sense switch 2 is used to request an inter- 
rupt of the Sort run during the Merge Phase. If the 
switch has been set down and if checkpoints are being 
taken, a pause occurs immediately after the next check- 
point of the phase has been taken. 

Action: The operator can take one of the following two 
actions : 

1. If run is to be continued at a later time, label merge 
tapes with their individual unit numbers. These tapes 
and the checkpoint tape are saved for use when run 
is restarted. With sense switch 2 down, press START. 
Control is then returned to IBSYS System Monitor. 

2. If sense switch 2 is inadvertently down and a pro- 
gram interrupt is not desired, set switch up and press 
START. 

*RS01 RESTART FAILED-CHKPNT MISSING OR 
UNREADABLE. 
Explanation: Sort RESTART is being requested, but 
either there is no checkpoint file or it cannot be read. 
Action: No operator action is required. 

*SA02 CORE TOO SMALL. SORTING IMPOSSIBLE. 
TO DELETE SORT, START. 
OPERATOR ACTION PAUSE. 

Explanation: The parameters given on the Sort control 
cards require Sort to use more core storage than is 
available. Sort cannot continue. 

Action: Press START. Sort is deleted, and control is re- 
turned to IBSYS System Monitor. 

*SQ02 RECORD OUT OF SEQUENCE 
THIS RECORD IS AT LOG. XX 
LAST RECORD IS AT LOG. XX 
UNIT XX IS THE UNIT WHERE 
OUT-OF-SORT ORIGINATED 
IT IS IN TAPE RECORD NUMBER XXXXX 
**OPTIONS** SS3 SS4 

TO DELETE SORT UP UP 

TO RETURN TO LAST CKPT UP DN 

TO GO ON ( IGNORE ) DN UP 

OPERATOR ACTION PAUSE. 

Explanation: A record is not in the correct sequence. 
This was probably caused by a machine error. This mes- 
sage occurs only during the Merge Phase. 
Action: The operator can take one of the following three 
actions : 

1. To delete Sort, set sense switches 3 and 4 up and 
press START. 

2. To restart at last checkpoint if this option is given, 
set sense switch 3 up and sense switch 4 down. Then 
press START. 
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down, set sense switch 4 up, and press START. The 
record will be positioned as if it began a new se- 
quence or string. (Note that this action may cause 
an extra merge pass.) 
*SQ03 RECORD OUT OF SEQUENCE 
THIS RECORD IS AT LOG. XX 
LAST RECOP^D WAS AT LOG. XX 
AND IS NOW AT LOG. XX IN OUTPUT BUFFER. 
UNIT XX IS THE UNIT WHERE OUT-OF-SORT 

ORIGINATED 
**OPTIONS** SS3 SS4 

TO DELETE SORT UP UP 

TO RETURN TO LAST CKPT UP DN 

TO GO ON (IGNORE) DN UP 

OPERATOR ACTION PAUSE. 

Explanation: A record is not in the correct sequence. 
This was probably caused by a machine error. This mes- 
sage occurs only during the Final Merge Phase. 
Action: The operator can take one of the following three 
actions : 

1. To delete Sort, set sense switches 3 and 4 up and 
press START. 

2. To restart at last checkpoint if this option is given, 
set sense switch 3 up and set sense switch 4 down. 
Then press START. 

3. To ignore error and continue, set sense switch 3 
down, set sense switch 4 up, and press START. ( Note 
that if this option is taken, the output file will con- 
tain more than one sequence.) 

*VR01 INVALID RECORD FORMAT 
RECORD AT LOG. XX 
PRESS START TO DELETE SORT 
OPERATOR ACTION PAUSE. 

Explanation: The record-length control word in an input 
record does not contain a number within the Kmits speci- 
fied on the RECORD control card. Sort cannot continue. 
Action: To delete Sort, press START. 

*VR03 RECORD, LOG XX INVALID FORMAT 
XX WORDS 

PRESS START TO DELETE SORT 
OPERATOR ACTION PAUSE. 

Explanation: The record-length control word of a record 
that is about to be written in the output file does not 
contain a number within the Hmits specified on the 
RECORD control card. Sort cannot continue. 
Action: To delete Sort, press START. 

*WR01 EOT ON ALL MERGE TAPES 

TO DELETE SORT SS3 UP 

TO IGNORE EOT SS3 DOWN 

OPERATOR ACTION PAUSE. 

Explanation: The Internal Sort Phase has written on each 
of the merge tapes to the end-of-tape marker without 
exceeding the Sort capacity calculated for full tape reels. 
Action: The operator can take one of the following two 
actions : 

1. If it is known that there is very little information 

remaining on input reel or that end-of-tape markers 

are far from the end of the tape, set sense switch 3 

up and press START. 

Note: This may result in a tape being pulled off the 
1 

ICCl. 

2. To delete Sort, set sense switch 3 down and press 
START. Control is returned to IBSYS System Monitor. 
( Note that if Sort is rerun at a later time, care should 
be taken to use longer tapes.) 

*WR02 EOT, SYSGK2-NO MORE UNRDBL RECORDS 
CAN BE SAVED 
PRESS START TO GO ON 

Explanation: the DEBLK subprogram has written on 
SYSCK2 to the end-of-tape marker. 
Action: Press START to continue Sort. No more unread- 
able records are dumped; they are ignored. 
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Chapter 8. Allocation of Common Storage 



Use of Common for Parameter Locations 

Many of the Sort subprograms refer to the same param- 
eter locations. These parameters are placed in con- 
secutive storage locations in common, beginning at 
location 77461 and working downward. 

Unless the RELCOM option is specified on the option 
control card, each group of parameters (i.e., each 
parameter table) is loaded beginning at the storage 
location indicated in Table IV. 

Table IV: Assembly-Defined Locations for 
COMMON Parameters 

NUMBER OF OCTAL 
PARAMETER PARAM- STORAGE 

AREA NAME ETERS LOCATION FUNCTION 

OPTPR 15 77461 Option Card Parameters 

OVEPR 2 77442 Overflow Card 

Parameters 

LABPR 5 77440 Label Card Parameters 

CHAPR 6 77433 Channel Card Parameters 

FILPR 14 77425 File Card Parameters 

MODPR 50 77407 Modification Card 

RECPR 10 77325 Record Card Parameters 

DELPR 2 77313 Delete Card Parameters 

SAMPR 7 77311 Sort and Merge Card 

Parameters 

CALPR 50 77302 Calculated Parameters 

GENPR 10 77220 General Parameters 

RAWPR 30 77206 Read and Write 

CNTPR 20 77150 Count Parameters 

ERAPR 30 77124 Erasable Parameters 

REFPR 1 77066 Referenced Parameters 

Parameter 

If the RELCOM option is specified, the parameter 
tables are relocated downward. 

Example 

The eflFect of specifying a relcom/ioo option is illus- 
trated for a few common locations as follows: 



OPTION Card Parameters 

OPTPR-0 

-1 







PARAMETER 




PARAMETER LOCATION 


LOCATION WITH 


COMMON 


WITHOUT 


RELCOM/ 100 


LOCATIONS 


RELCOM OPTION 


OPTION 


FILPR-3 


77422 


77256 


SAMPR-4 


77305 


77141 


MODPR-10 


77375 


77231 


ERAPR-29 


77067 


76723 



Allocation of storage within each of the common 
areas is given below. In the listing, the single letters 
appearing in parentheses have the following meanings : 

A Address 

D Decrement 

F Fixed-length records 

T Tag 

V Variable-length records 



-3 
-4 
-5 
-6 
-7 
-8 
-9 
-10 



-11 
-12 
-13 
-14 



RELCOM option: number of words that COM- 
MON is relocated 
CKSUMS option 

= no 

1 = yes 
NOCKPT option 

= no 

1 = yes 
EQUALS option 

= no 

1 = yes 
BUFFER option 

= no 

1 = yes 

VARIABLE BLOCK option 

= no 

1 = yes 
MAP option 

= no 

1 = yes 

NOF ( no off-line printing ) option 

= no 

1 = yes 
HISTORY option 

= no 

1 = yes 
TAPE option 

= no 

1 = yes 
CARDS option 

= no 

1 = yes 



OVERFLOW Card Parameters 

OVEPR-0 Number of blocks for overflow 
-1 

LABEL Card Parameters 

LABPR-0 Location of 20-word area for label construction 
-1 (A ) Location of 20-word area for reading label 
(D) = Label on 729 
NZ = Label on 7340 
-2 Location of LABEL card, if given 
-3 Length of output label in words whether stand- 
ard or nonstandard 
-4 Location of name used in Merge Phase internal 
labels 

CHANNEL Card Parameters 

CHAPR-0 (A) Location of input unit(s) UCW (Unit Con- 
trol Word) Reference Table 
(D) Length of table 
-1 (A) Location of output unit(s) UCW Reference 
Table 
(T) 2 
(D) Length of table (= merge order) 



42 



-2 (A) Location of UCW Reference Table of 
merge units which are used for output from 
Internal Sort Phase 

(T) 2 

(D) Length of table (— merge order) 
-3 (A ) Location of UCW Reference Table of other 
merge channel 

(T) 2 

(D) Length of table (— merge order) 
-4 Intersystem output 

NZ = Intersystem output 

— Not intersystem output 
-5 Tape available for unreadable records 

= yes 

NZ = no 

File Card Parameters 

FILPR-0 (A) Location of file data block of input file to a 
sort 
(D) Number of input file 
-1 Location of file data block of final output file 

-2 Location of file data block of first input file to a 
merge 

-3 ). . ., 

( Location ot Mle data block ot next input tile to a 

C merge 

-11 ; 

-12 
-13 

MODIFICATION Card Parameters 

For eacli modification card parameter location, 
(zero) indicates no request has been made for the 
specified exit, nz (nonzero) indicates a request has been 
made for the specified exit. 



User modification words for Inter- 
nal Sort Phase 



MODPR-0 


XSMOl 


-9 


XSMIO 


-10 


MPMOl 


-14 


MPM05 


-15 


FMMOl 


-24 


FMMIO 


-25 


DXSOl 


-34 


DXSIO 


-35 


DMPOl 


-i39 


DMP05 


-40 


DFMOl 



User modification words for Merge 
Phase 



User modification words for Final 
Merge Phase 



Customer Engineer modification 
words for Internal Sort Phase 



Customer Engineer modification 
words for Merge Phase 



Customer Engineer modification 
words for Final Merge Phase 



-49 DFMIO 



RECORD Card Parameters 

RECPR-O 



-1 (F) Record length during Merge Pnase 

(V) Maximum record length 
-2 (F) Record length of output from Final Merge 
Phase 

(V) Major record length 
-3 
-4 
-5 Record to be sorted or merged 

^ Fixed 

NZ = Variable 



-9 

DELETE Card Parameters 

DELPR-O (A) Location of DELETE control fields 
(D) Number of DELETE statements 



SORT and MERGE Card Parameters 



SAMPR-0 


Collating sequence 




= Scientific 




NZ = Commercial 


-1 


Merge order 


-2 


Number of external files to be merged 


-3 


(A ) Location of control field data 




(D) Number of control fields 


-4 


Merge indicator 




= Merge only 




NZ = Sort or sort and merge 


-5 


Sort indicator 




= Sort only 




NZ = Merge or sort and merge 



-6 



Calculated Parameters 

CALPR-0 Current run date, YY DDD. Year (YY) and day 

of year (DDD) 
-1 (F) Number of data records in an input block, 

i.e., blocking factor 
-2 (F) Number of data records in an output block, 

i.e., blocking factor 

(V) Maximum number of data records in output 

block 
-3 (V) Internal Sort bin length 
-4 Internal Sort Record Storage Area size, G 
-5 (F) Internal Sort merge table length, L 

(V) Internal Sort large table length, one entry 

per bin 
-6 (F) Internal Sort maximum length of sort, read, 

or write table, M 

(V) Internal Sort maximum length of Sort Table 
-7 Ratio (L/M) 

-8 (F) Input record length to Internal Sort Phase 
-9 (F) Record length during Merge Phase 
-10 (F) Output record length from Final Merge 

Phase 
-11 Sort capacity in number of words 



J.>U111U01 KJL 



^£H-1\.CVJ. OAl. 



,„4.„J 4.-^1 



-13 
-14 



(F) Record length of input to Internal Sort 

Phase 
(V) Minimum record length 



fields 

Maximum merge blocking in words 

Maximum merge blocking in number of data 

records 
-15 Number of merge areas for Merge Phase 
-16 Number of merge areas for Final Merge Phase 
-17 (V) Maximum merge blocking during Merge 

Phase 
-18 

-19 (F) (A) Location of low-padding record 
(D) Record length of padding record 
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-20 

-21 
-22 
-23 

-24 

-25 

-26 



-27 
-28 



-29 
-30 
-31 
-32 



-33 

-34 

-35 
-36 

-37 



-49 



(F) (A) Location of high-padding record 
(D) Record length of padding record 



Available core storage for tables and records in 

Internal Sort Phase 

Available core storage for tables and records in 

Merge Phase 

Available core storage for tables and records in 

Final Merge Phase 

(F) Number of words in input block, including 

check-sum block-sequence word if specified 

(V) Maximum number of data words in input 

block 

(F) Number of words in output block 

(V) Maximum number of words in output block, 

i.e., output buffer length 



(V) Length of read buffer in Internal Sort Phase 
(V) Number of words in packed extracted con- 
trol field; if EQUALS option is specified, this 
number is increased by one 
(V) Maximum number of merge blocks per 
write request from Internal Sort Phase 
(V) Minimum number of words per write re- 
quest from Internal Sort Phase 
(V) Length of buffer table in Internal Sort Phase 
(V) Length of locate table in Internal Sort Phase 



General Parameters 



GENPR-0 



Phase indicator 

= Edit Phase 

1 = Internal Sort Phase 

2 = Merge Phase 

3 = Final Merge Phase 
Mode indicator 

= Decimal 
NZ = Binary 

Pass number during Merge Phase 
(A) Location of RESTART point in checkpoint 
routine 

(D) Complement of index register 4 for use by 
RESTART for error return (4, 4) to Sort Mon- 
itor, accomplishing deletion of Sort 
Location of last executed CALL statement 
Location of last return from a subprogram which 
had been called 
Label switch 

NZ = Standard label on input tape 
= No label or a nonstandard label on input 
tape 

The count of the input records is placed here 
before the trailer label is read 
EMctionary switch 

= No dictionary specified for output file 
NZ = Dictionary specified for output file 
No dump indicator 

= Normal dumping of unreadable records 
NZ = No more unreadable records or records 
with error conditions can be dumped, but option 
to continue is taken 



Read and Write Parameters 

RAWPR-0 Read-write calling-sequence word number one 
-1 Read- write calling-sequence word number two 



_4 
-5 



-7 
-8 



-9 



-2 
-3 
-4 
-5 

-6 

-7 

-8 

-9 

-10 

-11 

-12 

-13 
-14 
-15 
-16 

-17 



-18 
-19 



-20 
-21 



-22 

-23 



-24 
-25 



-26 
-27 
-28 
-29 



Read completion indicator 
= Read in progress 
NZ = Read complete 
Read EOF indicator 
= Not at EOF 
NZ = At EOF 
Write completion indicator 
= Write in progress 
NZ = Write complete 
EOT indicator 
= Not at EOT 
NZ = EOT on last write 

(F) Number of blocks of external input that can 
be read into an area in Final Merge Phase 
(A ) Logical file number of current read 
(D) Logical file number of current write 
(D) Sequence count (string number) during In- 
ternal Sort Phase and Merge Phase 
Merge block end word 
Location of file data block for current read 
End-of-reel indicator 

External input switch (NZ = current output 
tape is external output) 

External input switch (NZ = current input tape 
is external input) 

Location of table for read calling-sequence word 
number two 

Location of table for vmte calling-sequence 
word number two 
Current read mode 
= BCD 
NZ = Binary 
Current write mode 
= BCD 
NZ = Binary 

(A) Number of logical records in current short 
block 

(D) Number of words in last data record of cur- 
rent short block 
Hypertape merge switch 
= At least one merge channel is not 7909 
NZ = Both merge channels are 7909 
Backward read indicator 

= Next (or current) merge pass is forward 
read 

NZ = Next (or current) merge pass is backward 
read 

Input to final merge is on Hypertape, and Merge 
Phase was omitted 
= no 
NZ = yes 

Overflow switch 

= Overflow has occurred 

NZ = No overflow 



Count Parameters 

CNTPR-0 Count of records sorted and written from In- 
ternal Sort Phase 

-1 Count of records merged during Merge Phase 

-2 Count of records merged and written from Final 
Merge Phase 

-3 Count of words dumped during Internal Sort 
Phase 

-4 Count of words dumped during Merge Phase 
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-5 

-6 

-7 

-8 

-9 
-IG 

-11 

-12 

-13 

-14 
-15 

-16 

-17 
-18 
-19 



Count ot words dumped during Jf inal Merge 
Phase 

Count of blocks dumped during current pass of 

Merge Phase because check svmis do not agree 

Count of records deleted during Internal Sort 

Phase 

Count of records deleted during current phase 

Count of low-padding records written by Final 

Merge Phase 

Count of high-padding records written by Final 

Merge Phase 

Count of records deleted from current Read 

Table 

Count of tape records written by DEBLK on 

SYSOUl or SYSCK2 

Count of records read by Internal Sort Phase 

Number of strings produced by current phase 

or pass 

Count of records read from external merge tapes 

by Final Merge Phase 



internal Sort Pttase w'itli Variable-Length Records 



Erasable Parameters 

Internal Sort Phase with Fixed-Length Records 



ERAPR-0 



-2 
-3 
-4 



-10 
-11 



-12 



-18 
-19 
-20 
-21 

-22 
-23 

-24 
-25 
-26 



-27 

-28 
-29 



(A) Location of input read buffer 

(D) Length of buffer 

(A) Location of current Merge Table, L 

(D) Length of current L 

Location of other Merge Table 

Number of dead tags in current L table 

Location of next record to be moved from the 

read buffer if BUFFER option is specified 

Location of next available tag in Read Table if 

BUFFER option is specified 



Calling-sequence word to XTRACT 
(A) Location of Sort Table 
(D) Length of table 

Calling-sequence word to DELETE 
(A) Location of last Read Table 
(D) Length of table 



Delete Sort switch 

Location of file number in merge label name 

(A) Location of Read Table 

(D) Length of table 

Location of Write Table 

(A) Location of Sort Table 

(D) Length of table 

Number of dead tags in last Read Table 

(A) Location of dead tags for WRITE to move 

for future reading 

(D) Number of dead tags 

(A) Location of live tags for writing 

(D) Number of Hve tags 



ERAPR-0 
-1 
-2 
-3 
-4 



-5 
-6 

-7 



-10 

-11 

-12 

-13 

-14 
-15 
-16 
-17 
-18 
-19 
-20 
-21 

-22 

-23 

-24 
-25 
-26 
-27 
-28 
-29 

Merge Phase 

ERAPR-0 
-1 
-2 
-3 

-4 

-5 



(A) Location of Sort Table 

(D) Length 

(A) Location of Buffer Table 

(D) Length of table 

(A ) Location of Locate Table 

/n^l T OTlfTf h n( tohio 

(A ) Location of current Availability Table 

(D) Length of table 

(A) Location of Availability Table, after which 

PUT builds the Write Table 

(D) Length of table 

Location of last record being written 

Number of records in last call to PUT 

Length of last L Table 

Length of last L Table 

(A ) Location of Sort Table 

(D) Length of Sort Table 

(A) Location of Block Table for PUT 

(D) Length of Block Table 

Calling-sequence word to DELETE 

(A) Indirect location of record to be checked 

for deletion 

(D) 1 _ 

Number of words in packed control fields, plus 
one if EQUALS option is specified 
Length from beginning of PUT list in L to base 
of L 



Number of words to be written by current PUT 
Delete Sort switch 

Location of file number in merge label name 

(A) Core-storage location just before Availability 

Table 

(T)l 

Complement of number of bins in Availability 

Table 

Core-storage location just before record control 

word of next record 

Equals word (sequence number) 

Current record length 



-17 
-18 
-19 

-20 

-21 



(V) Location of word containing length of pre^ 
vious record 

(V) Location of word containing length of cur- 
rent record 



Location of current record for XTRACT routine 



Delete Sort switch 

NZ = odd-numbered pass when both merge 

charmels are 7909 

Location of file number in merge label name 

Location of pass number in merge label name 
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-22 



-27 



-28 Number of strings in last pass divided by merge 
order 

-29 Switch to change XTRACT to alternate ascend- 
ing-descending sequence 



Final Merge Phase 



ERAPR-0 
-1 

-2 
-3 



-5 
-6 

-7 
-8 

-9 

-10 

-11 



-12 
-13 
-14 
-15 
-16 

-17 
-18 
-19 
-20 



-21 

-22 

-23 

-25 
-26 
-27 
-28 
-29 



Count of records which have been placed in 

output buffer 

Current output block size in words 

(A) Base location of ADDR Table 

(T) 2 

(A) Base location of ARWD Table 

(T) 2 

(A) Base location of FLWD Table 

Location of current output buffer 

Base location of sequence-check control field 

Indirect base location of data portion of current 

merge record 

Location of current record for XTRACT 

Base location of entire current merge record 

Calling-sequence word to DELETE 

(A) Indirect location of record to be checked 

for deletion 

(D) 1 

Length of output data record in words 

Length of entire record in words 

Location of data record 

Location of first word of data in the record 

Indirect location of first word of data in the 

record 

Number of words preceding data in the record 

Delete Sort switch 

At initialization time — location of file number 

in merge label name 

During merging — location of record in output 

buffer 

Location of next available word in output buffer 

= Keep this data record 

NZ = Drop this data record 

(A) Number of file currently being read 

(D) Number of input buffer 

Cumulative number of records read 

External order of merge 

Internal order of merge 

Read-demand switch 

Write-request switch 



Input and Output File Data Block 

Information on the input and output files of a sort 
and/or merge run is taken from the parameters of the 
Fn.E control cards for that run. The information for 
each file is stored in a 25-word block, arranged as 
follows: 







USED 


ON 


WORD 


CONTENTS 


INPUT 


OUTPUT 


1 


Mode 

= decimal ( assumed if omitted) 

NZ = binary 


X 


X 


2 


Density 

= high (assumed if omitted) 

NZ = low 


X 


X 


3 


Padding 

= no padding (assumed if omitted) 

1 = low padding 

2 = high padding 


X 


X 


4 


Label 

= Standard 

1 = nonstandard 

2 = no label (assumed if omitted) 




X 


5 


Label density 

= high (assumed if omitted) 

NZ = low 


X 


X 


6 


Block size (must be given) 


X 


X 


7 


Serial number (checked if given) 


X 


X 


8 


Reel-sequence number 
(checked if given) 


X 


X 


9 


Block check sums 

= no (assumed if omitted) 

NZ = yes 


X 


X 


10 


Block-sequence number 
= no (assumed if omitted) 

NZ = yes 


X 


X 


11 


Dictionary 

= no (assumed if omitted) 

NZ = yes 


X 


X 


12 


Name (checked if given) 


X 


X 


13 


Name 


X 


X 


14 


Name 


X 


X 


15 


Input number (must be given) 


X 




16 


Number of input reels (1 if not given) 


X 





Referenced Parameters Parameter 

REFPR-0 Location of last word used by referenced param- 
eters 



17 
18 



19 
20 



21 
22 
23 

24 

25 



Checkpoint 

= standard 

1 = nonstandard 

2 = no checkpoint (assumed if omitted) 
Number of retention days 

Block check sums or block sequence 

= neither 

NZ = one or both 

Grouping factor 

Number of reels processed to date 

Block size plus check sum or 

sequence word 
Field-length blocking — number of 

records/block 





X 


X 


X 


X 


X 


X 




X 


X 


X 


X 
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Chapter 9. System Maintenance 



Updating and Editing 7090/7094 Sort 

The IBM 7090/7094 Generalized Sorting System occu- 
pies two consecutive files on the ibsys system tape. The 
first file consists of one program, named Sort, which is 
assembled in absolute form and has its origin at 
SYSORG. Sort contains the Sort Monitor and Sort Sub- 
program Binary (ssb) Loader and is loaded when the 

1 16 

(^EXECUTE SORT 

control card is read. For each phase of the sort-and- 
merge run, Sort loads the appropriate subprograms 
from the second file and passes control to the main 
program of each phase. 

The second file contains several subprograms, each 
assembled in relocatable form and consisting of one 
tape record formed by blocking the column-binary 
card images for the subprogram. User modification 
programs can be inserted at the end of this file. After 
control card analyses, Sort determines which subpro- 
grams are to be loaded during each phase so that 
maximum space in core storage is provided for sorting 
at object time. 

The IBSYS System Editor, ibedt, does not allow octal 
or binary modifications to be made to relocatable sub- 
programs but does provide for insertion and/or re- 
placement of subprograms. 

To update one or more of the subprograms in 7090/ 
7094 Sort, it is necessary to: 

1. Assemble the subprograms: ibsfap places the 
relocatable card images of the assembled subprograms 
on SYSPPi. 

2. Reassign sysppi to the sysut2 function. 

3. Build a new system type using ibedt and a tape 
^REPLACE card for each subprogram being replaced. A 
TAPE *INSERT Card is used for each modification sub- 
program being inserted. When ibedt finds the position 
where a newly assembled subprogram is to be inserted, 
it blocks the binary card images and provides the nec- 
essary header words and the required transfer card. 
The header words are described under "Standard Sys- 
tem Library Record Formats" in the publication IBM 
7090/7094 IBSYS Operating System: System Monitor 
(IBSYS) Form C28-6248. 

The symbolic tape distributed with the Sort package 
contains symbolic card images blocked 16 cards per 
block except for the end cards, which are unblocked. 
Normal rules for doing a fap update are provided in 
the publication IBM 709/7090 Programming Systems: 



7 


16 


*FAP 




UPDATE 


X, y, , D 


ENDUP 




*FAP 




UPDATE 


X, y 


(Correction Cards) 




END 





FORTRAN Assembly Program (FAP), Form C28-6235. 
The symbolic tape has subprograms arranged on it so 
that the serializations beginning in column 73 have the 
order given in the section "Sort Subprograms and 
Communication ." 

To illustrate the method of correcting and assem- 
bling subprogram nnn, which may follow another sub- 
program mmm, the following card sequence is used: 

73 



mmmZZZZZ 



where x and y are logical tape numbers (ibsfap uses 
8, 9, and 10 for updating). The zzzzz component repre- 
sents a quantity at least as large as the number in the 
last card of the subprogram being considered. 

The first three cards space the symbolic tape past 
subprogram mmm, the "D" specifying assembly dele- 
tion. The remaining cards specify assembly of nnn. 



Sort Modification Letters 

In order to facilitate the release of modifications to the 
field, the procedure is as follows: 

Modifications are released in the form of symbolic 
card corrections, together with control cards which al- 
low the symbolic card deck to be placed on a tape 
attached as sysini and used during an ibsys system run. 
IBSFAP and ibedt are then used to produce an updated 
symbolic tape and an updated ibsys system tape. Up- 
dating with this deck is alv/ays from the latest modifi- 
cation level of the Sort system. Accompanying the sym- 
bolic card corrections are the binary cards for each of 
the subprograms which are being changed. These 
binary cards may be placed on a tape attached as 
SYSUT2 and used by the ibsys System Editor, ibedt, to 
replace the corresponding subprograms on the old sys- 
tem tape to produce a new system tape. Use of only 
the binary cards does not result in a new listing or a 
new symbolic input tape. 

In conjunction with the above symbolic deck, in- 
structions on the maintenance of a master update deck 
are distributed with each modification. This master 
updates from modification level to the latest level. 
Therefore, users who do not want to update for every 
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modification can reassemble and bring their own sys- 
tem up to the latest level with only one assembly. As- 
sembly is performed without renumbering columns 
73-80. This provides the user with an up-to-date listing 
o£ the reassembled subprograms. At the same time, a 
common communication medium is provided so that 
several modifications can be made to the same sub- 
program within a given version. 

When a new version of ibsys is distributed, the Sort 
on the IBSYS system tape is at the latest modification 
level. The user needs to update Sort when he receives 
a new ibsys version only if he is using modification pro- 
grams on the IBSYS system tape or if he has put his own 
modifications into the system. 

For the following example, which updates all sub- 
programs of Sort and replaces them on the ebsys system 
tape, assume the following sysuni table and fap logical 
tape numbers. Note that material enclosed in brackets 
[ ] is optional, subject to the tape density settings of 
the installation. 



16 



73 





SYSUNI TABLE 


FUNCTION UNIT 


DENSITY FAP 


SYSLBl Al 


High 


SYSOUl Bl 




SYSINl A2 




SYSPPl B2 




SYSCKl None 




SYSCK2 None 




SYSUTl A3 


High 


SYSUT2 B3 


High 


SYSUT3 A4 


High 


SYSUT4 B4 


High 


Attached unit not assigned or reserved: 


A5 




B5 





FAP LOGICAL TAPE NUMBER 



9 
10 



The control cards for updating Sort are as follows: 



{ 
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$JOB 




(Identification] 


$IBSYS 






$DATE 




mmddyy 


$ATTACH 


B3 


$AS 




SYSUT2 [, H] 


$ATTACH 


A5 


$AS 




SYSCKl [, H] 


$ATTACH 


B2 


$AS 




SYSPPl [, H] 


$EXECUTE 


IBSFAP 




*FAP 






UPDATE 8, 9 


(Correction Cards, if any) 




END 






*FAP 






UPDATE 8, 9 


(Correction Cards, if any) 




END 






*FAP 






UPDATE 8, 9 


(Correction Cards, if any) 




END 





Set density to that of dis- 
tributed tape, 556 BPI. 
Set densities of SYSCKl 
and SYSPPl to agree 
with Symbolic input tape 
(SYSUT2). 

(SORT) 



(HYSTAR) 



ISMZZZZZ 



(lOPEN) 



ARSZZZZZ 



ASOZZZZZ 



*FAP (LABEL) 

UPDATE 8, 9 
(Correction Cards, if any) 

END BLBZZZZZ 

*FAP (BTD) 

UPDATE 8,9 
(Correction Cards, if any) 

END CBTZZZZZ 

*FAP (CALC) 

UPDATE 8,9 
(Correction Cards, if any) 

END CCAZZZZZ 

*FAP (EPOOl) 

UPDATE 8,9 
(Correction Cards, if any) 

END CEPZZZZZ 

*FAP (RBOl) 

UPDATE 8,9 
(Correction Cards, if any) 

END CRBZZZZZ 

*FAP (RELEAS) 

UPDATE 8,9 
(Correction Cards, if any) 

END CREZZZZZ 

*FAP (SKOOl) 

UPDATE 8,9 
(Correction Cards, if any) 

END CSKZZZZZ 

*FAP (VXS) 

UPDATE 8,9 
(Correction Cards, if any) 

END CVXZZZZZ 

*FAP (MRGIO) 

UPDATE 8,9 
(Correction Cards, if any) 

END DBSZZZZZ 

*FAP (BUFRD) 

UPDATE 8, 9 
(Correction Cards, if any) 

END DBUZZZZZ 

*FAP (XTRACT) 

UPDATE 8, 9 
(Correction Cards, if any) 

END . DEXZZZZZ 

*FAP (FXS) 

UPDATE 8, 9 
(Correction Cards, if any) 

END DFXZZZZZ 

*FAP (GET) 

UPDATE 8,9 
(Correction Cards, if any) 

END DGEZZZZZ 

*FAP (PUT) 

UPDATE 8, 9 
(Correction Cards, if any) 

END DPUZZZZZ 

*FAP (READ) 

UPDATE 8, 9 
(Correction Cards, if any) 

END DREZZZZZ 

*FAP (WRITE) 

UPDATE 8,9 
(Correction Cards, if any) 

END DWRZZZZZ 

*FAP (WTFIX) 

UPDATE 8,9 
(Correction Cards, if any) 

END DWTZZZZZ 

*FAP (DEBLK) 

UPDATE 8, 9 
(Correction Cards, if any) 



48 



f 



7 16 73 

END m:>TyLTZTL 

*FAP (FIMRG) 

UPDATE 8, 9 
(Correction Cards, if any) 

END YNYZTLTZ 

*FAP (MERGE) 

UPDATE 8,9 
(Correction Cards, if any) 

END EVMZZZZZ 

*FAP (POSTP) 

UPDATE 8, 9 
(Correction Cards, if any) 

END FPPZZZZZ 

*FAP (CKPT) 

UPDATE 8,9 
(Correction Cards, if any) 

END GCKZZZZZ 

*FAP (DELETE) 

UPDATE 8,9 
(Correction Cards, if any) 

END GDEZZZZZ 

*FAP (HYFIMR) 

UPDATE 8,9 
(Correction Cards, if any) 

END HFMZZZZZ 

*FAP (MRGHYO) 

UPDATE 8,9 
(Correction Cards, if any) 

END HIOZZZZZ 

*FAP (HYMERG) 

UPDATE 8,9 
(Correction Cards, if any) 

END HMRZZZZZ 

*FAP (HYOPEN) 

UPDATE 8,9 
(Correction Cards, if any) 

END HOPZZZZZ 

*FAP (HYGET) 

UPDATE 8,9 
(Correction Cards, if any) 

END HYGZZZZZ 

*FAP 
UPDATE 0,9, U,D 

(((((((0 
END (((((((1 

ENDUP (((((((1 

$IBSYS 
$ENDFILE 
$REWIND 
$SWITCH 



SYSPPl 
SYSCKl 



$REMOVE 

$REMOVE 

$IBEDT 

*EDIT HIGH, MAP 

TAPE 'REPLACE SORT 
TAPE 'REPLACE HYSTAR 
TAPE 'REPLACE lOPEN 



SYSPPl 

SYSPPl 

SYSPUT2, SYSPPl READY BINARY 
FOR IBEDT. 
SAVE OLD 
SYMBOLIC TAPE. 
SAVE NEW 
SYMBOLIC TAPE. 



TAPE 

TAPE 

TAPE 

TAPE 

TAPE 

TAPE 

TAPE 

TAPE 

TAPE 

TAPE 

TAPE 

TAPE 

TAPE 

TAPE 

TAPE 

TAPE 

TAPE 

TAPE 

TAPE 

TAPE 

TAPE 

TAPE 

TAPE 

TAPE 

TAPE 

TAPE 

TAPE 

TAPE 

(eof card) 

$IBSYS 

$REWIND 

SSTOP 



'REPLACE 
'REPLACE 
'REPLACE 
'REPLACE 
'REPLACE 
'REPLACE 
'REPLACE 
'REPLACE 
'REPLACE 
'REPLACE 
'REPLACE 
'REPLACE 
'REPLACE 
'REPLACE 
'REPLACE 
'REPLACE 
'REPLACE 
'REPLACE 
'REPLACE 
'REPLACE 
'REPLACE 
'REPLACE 
'REPLACE 
'REPLACE 
'REPLACE 
'REPLACE 
'REPLACE 
'REPLACE 
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LABEL 

BTD 

CALC 

EPOOl 

RBOl 

RELEAS 

SKOOl 

VXS 

MRGIO 

BUFRD 

XTRACT 

FXS 

GET 

PUT 

REAp_ 

WRITE 

WTFIX 

DEBLK 

FIMRG 

MERGE 

POSTP 

CKPT 

DELETE 

HYFIMR 

MRGHYO 

HYMERG 

HYOPEN 

HYGET 



73 



The new system 
symbolic tape is on 



SYSUT2 

(EOJ) 

tape is now on sysuti, and the new 
SYSCKl (unloaded). 



Removing Hypettape Subprograms 

The following control card deck may be used to re- 
move from the ibsys system tape those programs that 
are used only during sort and/or merge runs that use 
IBM 7340 Hypertape Drives. 
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$ATTACH 

$AS 

$IBEDT 



'EDIT 

'REMOVE 

'REMOVE 

'REMOVE 

'REMOVE 



A3 
SYSUT1[, H] 

MAP, MODS 

HYFIMR 

MRGHYO 

HYMERG 

HYGET 



(eof card) 

$IBSYS 

?STOP 

The new ibsys system tape, with four subprograms 
removed, is created on sysuti. 
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Sample Problem 

The example which follows is part of an actual Sort 
run. It is used to illustrate the procedures to be fol- 
lowed in obtaining the desired results. 

It is desired to sort a 10,000 record binary file con- 
sisting of 100 blocks of tape records. Each block con- 
tains 100 ten-word logical data records (block size 
equals 100). The output is to consist of 100 tape-record 
blocks of 100 ten-word logical records each. 

The control field for sorting is the first word of each 
logical data record. The scientific collating sequence is 
to be used, and the sort is to be in ascending order. 
The input and output tape drives are to be set for high 
density. Though not necessary for the running of this 
job, various fields have been specified on an option 
control card to illustrate the on-line printing that they 
cause. 

The required Sort control cards are: 



5. Set sense switch 1 down and press the Load Tape 
button. 

If the OPTION card is not used, the on-line printout 
associated with this run appears in Figure 13. The cor- 
responding off-line printout for this same condition is 
shown in Figure 14. If the option card is included, 
both the on-line and the off-line printouts are as shown 
in Figure 15. 

Figure 16 is a reproduction of the first thirty-two 
logical data records of the input tape. The first word of 
each record is underlined for identification. The first 
thirty-two output logical data records, again with the 
first data word underlined, are shown in Figure 17. 

Figure 18 shows the section of the output which con- 
tains the first input record. This record is located and 
the 17th data record of the eighth (tenth octal) output 
tape record. The first word has been underlined. 



CHANNEL, INPUT/B, MERGE/(A, B) 



FILE, INPUT/1, REEL/1, DENSITY/H, MODE/B, 
BLOCKSIZE/1000 



RECORD, LENGTH/ 10, TyPE/F, FIELD/(6, 6, 6) 
FILE, OUTPUT, DENSITY/H, MODE/B, 
BLOCKSIZE/1000 



SORT, SEQUENCE /S, ORDER/3, FIELD/ 1, FILE/1 
"END 



The option card could have the following format 
and, if used, would be inserted before the end card. 

1 7 

/ OPTION, MAP, HISTORY, CARDS, MAPS 

To sort this 10,000-record input data file, the pro- 
cedure is as follows: 

1. Mount data tape on channel B. 

2. Mount SYSLBi on Al. 

3. Ready three additional tapes on each channel. 

4. Prepare the control card deck and place it in the 
card reader.^ 



SRELEASE 


SYSPPl 




SRELEASE 


SYSUTl 




SRELEASE 


SYSUT2 




SRELEASE 


SYSUT3 




SRELEASE 


SYSUTif 




SATTACH 


B6 




SAS 


SYSCK2.H 




SATTACH 


RDA 




SAS 


SYSINl 




SEXECUTE 


SORT 




UNIT A^ 


CLOSING OUTPUT REEL NO. 


0001 


END OF SORT 






SIBSYS 






SSTOP 






PERIPHERAL 


UNIT POSITIONS AT END OF 


JOBS 


SYSPPl NO 


UNIT REC. 0. FILE 





SYSOUl IS 


A3 REC. 00101, FILE 


00000 


SYSINl IS 


RDA REC. 00018. FILE 


00000 



*OU01 



END OF JOBS 

Figure 13. On-Line Printout Without OPTION Card 



^ This deck is inserted in the order shown on the off-line listing 
accompanying this example. The $IBSYS and the $STOP cards 
would follow the END card at this point. 
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$BELEflSE 


SYSPPl 


SRELEASE 


SYSUTl 


$RELE«SE 


SYSUT2 


(RELEASE 


SYSUT3 


$BELE«SE 


SYSUT4 


$ATTACH 


B6 


as 


SYSCK2,h 


SATTACH 


RDA 


$AS 


SYSINl 


(EXECUTE 


SORT 


PROGRAM 


LOAD ADDRESS 


HYSTAR 


05654 


lOPEN 


G6165 


LABEL 


10546 


BTD 


11412 


CALC 


11510 


EPOOl 


15466 


R801 


33425 


RELEAS 


33705 


SKOOl 


34012 



CHAKNEL. INPUT/B, MERGE/tA.B) 

FILEf INPUT/1, REEL/1, CENSITY/H, HODE/B, BLOCKSIZE/ICOO 

FILE, OUTPUT, DENSITY/H, KODE/8, 8LOCKSIZE/1000 

RECORD, LENGTH/10, TYPE/F, FIELC/C6,6,6) 

SORT, SEQUENCE/S, CRDER/3, FIELD/1, FlLE/1 

Ef»D 



MERGE BLOCKING (RECORD/TAPE BLOCK) 
PREPARE UMTS AS FOLLOWS— *EP06 



200 



UNIT 


B2 


INPUT 


TAPE 




UNIT 


A4 


MERGE 


TAPE 




UNIT 


AS 


MERGE 


TAPE 




UNIT 


A6 


MERGE 


TAPE 




UNIT 


Bl 


MERGE 


TAPE 




UNIT 


B4 


MERGE 


TAPE 




UNIT 


B5 


MERGE 


TAPE 




UNIT 


B6 


CHECKPOINT 


TAPE 


PROGRAM 




LOAD ADDRESS 




HYSTAR 






05654 




ICPEN 






06165 




LABEL 






10546 




BTD 






11412 




XTRACT 






11510 




FXS 






12175 




READ 






14032 




WRITE 






15373 




DEBLK 






16176 




CKPT 






16667 



UNIT B2 MAS FINAL REEL OF INPUT 

Figure 14. Off -Line Printout Without OPTION Card ( Sheet 1 of 2) 
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INTERNAL SORT PHASE CCMPLETED. 



lOOOC RECORDS SORTED. 



RCGRAr* 


LOAD ADDRESS 


HVSTAR 


C5654 


lOPEN 


06165 


LABEL 


10546 


BTO 


11412 


MRGIG 


1151C 


XTRACT 


13253 


DEBLK 


1374C 


MERGE 


14431 


CKPT 


20217 



MERGE PHASE PASS 1 COMPLETED. 
MERGE PHASE COMPLETED 



RECORD COUNT 



10000 



RCGRAM 


LOAD ADDRESS 


HYSTAR 


C5654 


ICPEN 


06165 


LABEL 


10546 


BTO 


11412 


RELEAS 


11510 


MRGIO 


11615 


XTRACT 


13360 


DEBLK 


14045 


FIMRG 


14536 


PCSTP 


17672 


CKPT 


20245 



LMT A4 CLOSING OUTPUT REEL NO. 0001 •OUOl 



PHASE 1 



PHASE 2 



PHASE 3 



CCUNT OF INPUT RECORDS TO SORT 

ANC/CR MERGE 
CCUNT CF RECORDS SORTED OR MERGED 
CCUNT OF V<ORDS DUMPED 
CCUNT OF RECORDS DELETED 
CCUNT OF HIGH PADCING RECORDS IN OUTPUT 
CCUNT OF LOh PADDING RECORDS IN OUTPUT 

END OF SORT 

$IBSYS 
JSTCP 



lOOOO 
lOOOC 



c 

N/A 
N/A 



N/A 

lOOCO 

N/A 
N/A 
N/A 



N/A 
10000 







PERIPHERAL UNIT FCSITICNS AT END OF JOBS 



SYSPPl NO UNIT 
SYSOUl IS A3 
SYSINl IS RDA 



REC. 0, FILE C 
REC. COIOl. FILE 00000 
REC. 00018, FILE 00000 



END OF JOeS 

Figure 14. Off-Line Printout Without OPTION Card ( Sheet 2 of 2 ) 
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SRELEASE 


SYSPPi 


SRELEASE 


SYSUTl 


SRELEASE 


SYSUT2 


SRELEASE 


SYSUT3 


SRELEASE 


SYSUT4 


SATTACH 


B6 


SAS 


SYSCIC2»H 


SATTACH 


RDA 


SAS 


SYSINl 


StXtC'Jl E 


SOKi 


PROGRAM 


LOAD ADDRESS 


HYSTAR 


05654 


lOPEN 


06165 


LABEL 


10546 


BTD 


11412 


CALC 


11510 


EPOOl 


15466 


RBOl 


33425 


RELEAS 


33705 


SKOOl 


34012 



OPTION .MAP .HISTORY .CARDS .TAPES 

CHANNEL* INPUT/B. MERGE/(A.B) 

FILE. INPUT/1. REEL/1. DENSITY/H. MODE/B. BLOCKSIZE/1000 

FILES OUTPUTS DENSITY/H? MODE/B. BLOCKSI2E/1000 

RECORD. LENGTH/10. TYPE/F. FIELD/ ( 6.6 .6 ) 

SORT. SEQUENCE/S. ORDER/3. FIELD/1. FILE/1 

END 

MERGE BLOCKING (RECORD/TAPE BLOCK) 200 

PREPARE UNITS AS FOLLOWS— *EP06 



UNIT 


B2 


INPUT TAPE 


UNIT 


A4 


MERGE TAPE 


UNIT 


A5 


MERGE TAPE 


UNIT 


A6 


MERGE TAPE 


UNIT 


Bl 


MERGE TAPE 


UNIT 


B4 


MERGE TAPE 


UNIT 


B5 


MERGE TAPE 


UNIT 


B6 


CHECKPOINT TAPE 



PRESS START WHEN ALL UNITS ARE PROPERLY PREPARED AND IN READY STATUS. 



OPER. ACTION PAUSE 



CONTINUING 




PROGRAM 


LOAD ADDRESS 


HYSTAR 


05654 


lOPEN 


06165 


LABEL 


10546 


BTD 


11412 


XTRACT 


11510 


FXS 


12175 


READ 


14032 


WRITE 


15373 


iJtbLK 


16176 


CKPT 


16667 



Figure 15. On-Line and Off-Line Printout with OPTION Card ( Sheet 1 of 2) 
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UNIT B2 WAS FINAL REEL OF INPUT 
INTERNAL SORT PHASE COMPLETED. 10000 RECORDS SORTED. 
PROGRAM LOAD ADDRESS 



HYSTAR 

lOPEN 

LABEL 

BTD 

MR6I0 

XTRACT 

DEBLK 

MERGE 

CKPT 



05654 
06165 
10546 
11412 
11510 
13253 
13740 
14431 
20217 



MERGE PHASE PASS 1 COMPLETED. RECORD COUNT 
MERGE PHASE COMPLETED 



10000 



PROGRAM 



LOAD ADDRESS 



HYSTAR 

lOPEN 

LABEL 

BTD 

RELEAS 

MRGIO 

XTRACT 

DEBLK 

FIMRG 

POSTP 

CKPT 



05654 
06165 
10546 
11412 
11510 
11615 
13360 
14045 
14536 
17672 
20245 



UNIT A4 CLOSING OUTPUT REEL NO, 0001 *OU01 



COUNT OF INPUT RECORDS TO SORT 

AND/OR MERGE 
COUNT OF RECORDS SORTED OR MERGED 
COUNT OF WORDS DUMPED 
COUNTOOF RECORDS DELETED 

COUNT OF HIGH PADDING RECORDS IN OUTPUT 
COUNT OF LOW PADDING RECORDS IN OUTPUT 



,SE 1 


PHASE 2 


PHASE 3 


10000 


N/A 


N/A 


10000 


10000 


10000 














N/A 





N/A 


N/A 





N/A 


N/A 






END OF SORT 



SIBSYS 
SSTOP 



PERIPHERAL UNIT POSITIONS AT END OF JOBS 



SYSPPl NO UNIT 
SYSOUl IS A3 
SYSINl IS RDA 



REC. 0. FILE 
REC. 00105. FILE 00000 
REC. 00019» FILE 00000 



END OF JOBS 

Figure 15. On-Line and Off-Line Printout with OPTION Card ( Sheet 2 of 2) 
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END OF FILE 

BINARY TAPE 02223 RDS ( 00000)8 FILES RDS { 00000)8 RECORDS 

RECORD OOCOl { 01750)8 ( OICOOIO WORDS 

08000 04536403015A -1461303A7644 -123374243534 212744050627 132060424151 136771203217 C54050726244 -013361610037 
00010 3^4042301065 327773606673 - 216271142C57 -253215471407 -377437401536 306541353452 C33722410025 -030351006432 
00020 343325352402 -100507152356 226553511373 -044713573060 350512146720 -256742511452 260527235030 021624302466 
00030 -131733776006 2615731 11C21 -013077703463 213073245046 -103076267563 263571257744 146245 075242 123121244012 
00040 -170601041565 055525171367 0C0742736513 -235775467374 317412164373 -231644641654 -047452205245 -034776453050 
00050 203626330203 -027421223165 -364204755267 272255032707 321074712034 -276541662725 -075724646026 -004371020444 
00060 -27155C640544 243157016136 - 267722446752 -111552100232 -375741461612 -210457447263 10^2100^752 143440^45624 

»--,«, ^^ — -a.-. ^w^<L^^ . -.<Luw I -i-i^j 1 1 ivji j.^<i sjoi.seLnnjLiis.c looou iv^ijs ! i. -S£.!3'm/.£.ib5i 011317334023 -310720264411 

00100 -046371422157 043207051703 -115252056173 107402777653 -217076533435 -160164175341 - 233174331607 147750637031 
09110 -060324110001 203075674747 346420200677 270632106420 015222056652 166147371730 033407301070 210707200130 
00120 353244751067 -073615725707 -276732110233 -202666150315 -312221166525 -321542517325 -275335011434 -370511213132 
00130 2134673C3103 044663657C66 153067222203 -336766740770 -311712612720 244544624454 262753577G46 170715353662 
00140 -340332540132 -206557043411 -166323420753 263166764242 Q42513317720 -271 75?i 20'i'60 0^4641742^12 ST2 «46364,1 
00150 103533246661 -212377516423 122736273110 -002325516742 -355641126412 364762033065 372354207574 031322367665 
C0160 212012172172 -252040054C5 1 111404154C14 134060645711 -067333574060 301773474220 -032072771260 164617565211 
00170 362663131753 040020070436 -151565603255 -114447526556 356206612370 -206002514625 010571224732 -066707454403 
00200 -030244002067 -127615420707 - 171736205235 -314726407343 323661130025 -016605325627 C02027454756 171126603670 
00210 -337254013221 -13532602237C 347155672522 -262735506474 - 154352347473 002603360753 340402650340 351633632073 
00220 -147431212457 -115650773204 -2653207204 76 -041130053216 -357076010435 -121171350344 -015250642644 073564746441 
00230 373270661504 306501211^ rr 157065170727 366746364755 065474366561 -242145726727 160370414056 -226476730775 
06240 377730156404 -126140034377 -025512411620 -100245653554 254362772352 306306107430 -140536310563 006731571544 
00250 345106413643 -353502523225 021076435735 -246062300040 102755410474 -047231725772 -223312521545 355641411352 
00260 -025522720525 106646255730 -040275464462 -335655253034 133073142433 -067135316322 -014651524372 161165241442 
00270 346707640516 150311054632 110766521403 031662616165 271553466073 341016715363 -017750123044 -353663723641 
00300 210765233702 001551360657 3C7230634704 -171140323477 -166213075521 370454540261 - 016367503731 135071512372 
06310 366652276745 -344704333354 -376320403351 167525315615 353051140017 252265644542 -230703462013 331145150302 
00320 -346064202754 -164631056445 150113726346 -135657127563 -245122520452 353446750530 -116272734660 371024350614 
00330 -26714C575411 025045454455 2C5071153457 261014165007 124224057127 -352175112747 -314712130273 -112246177355 
00340 -1451744C0561 232047670331 -314507675C71 -243212761532 -272776050110 175070532544 241142655040 -277367170571 
06350 166130273131 270734365374 -234643011566 203306402203 236436424263 -223526667443 066556567723 037546531303 
00360 352477527763 167402347553 052373564533 -054737343623 -267001031112 -246124661567 307535212307 166721176537 
00370 -056002436565 -234330023371 - 161176245535 -170163573641 -237066110303 045461351664 -115036612362 -205626676342 
00400 006355223422 -037033435573 043330550757 -252240370277 304313500320 353552761060 156436622510 -061622406740 
00410 204716426775 227411153704 23207C517204 345004560001 -127115714047 -252775751074 -162512321673 365045776754 
00420 -364765606154 -2565417C3652 -305115115622 -226675201574 -072313202573 -136550044057 -C56422453500 116453645633 
00430 -315055332622 -216140753776 033104536214 -353156365104 -363722150200 -272652704533 366143327713 -062003763201 
00440 -236307312643 120304113226 211312436745 072C45132154 234161614752 234100536024 -214253403121 167613567461 
00450 -004617150723 160313211106 -144017162423 -170220251411 - 316465655555 -170051223657 C22330156304 115041373477 
00460 -226723304126 072064055341 -12570C440211 -247310744056 -231056323675 314742672200 370530017031 243643440500 
06470 326142610140 -072Q751CQ474 120.4.12163673 105553663360 -154347765216 -22155156573.2 356032657105 -24255600D310 

Figure 16. First Thirty-Two Logical Data Records of Input for Sample Run 

BINARY TAPE 01224 RDS ! 00000)8 FILES RDS ( 00000)8 RECGRCS 

RECORD 00001 ( 01750)8 ( OICOOIO WORDS 

00000 QG0Q47651216 -047451415332 302134142107 C41106646730 343642257265 -210375203474 -203512705272 -02 144007335^ 
00010 224711273517 -351327141643 0C01QC163337 -326514762461 -015327210331 006732725173 -075426723755 042514156661 
00020 -366522672125 1412460C4330 -314276150063 -223271753444 0C0164226054 061631273745 -156012672045 -372444635454 
00030 -316457464450 076257325710 0C4117547C50 221C16622110 341744251041 -377617245611 CQ0213111446 104656555063 
00040 30101Q144144 -312116606335 -044344677741 -231512765705 1C5402616612 -105631475072 352412037445 -147443742053 
00050 000241140712 -320262233565 214555112475 370437770776 364173745606 206730137016 C65100373636 -013404643154 
00060 000017715151 -134223711413 0C0301660137 165116322663 036151024144 -016171264544 -161451120444 173171175644 
00070 -272146532342 031332214320 -337421101352 -254C43055226 0C0354053421 -165025175567 C25246420715 -167334547621 
00100 -24634C363064 352047501256 313703654666 105542172700 144035362334 373715052634 000437317663 043141270052 
00110 113715455422 063700364776 -241545721414 364524466514 -012331214105 -121654617706 -164464707026 -116031567645 
00120 000501453065 205124603467 -052037235411 322542157053 201334770434 157507124130 345446106070 321440113724 
00130 030411447417 - 1525253C2342 0C0510654544 332422365340 -051513635373 -310154552261 -346264245326 -331133373346 
00140 -142534527061 -070600220224 -3C4351626317 333265353642 000551671772 -165272176445 007263415153 141620341237 
00150 214571251457 364710242404 260254704C74 351720136764 247070640057 -275403464400 000564445027 -053340673251 
00160 322707163216 025405725127 311121203452 -126435315522 160152323573 -200505720654 -212422660053 012152515533 
OOnO 000661413152 -350202245225 017776423335 243163421041 152264015101 -325030206044 -124274505734 -205645177027 
00200 -266767716356 -205763121466 000710031216 -155416447135 -153246301543 -344042070525 -C23631262632 072745244302 
00210 341264373754 -061435664447 056355371374 226131550072 000763020753 120326563043 -130360271324 306367640716 
00220 366527245530 212727674770 -270166336130 377457323163 255720216051 -133232450120 000767710156 -374567001670 
00230 -165427710030 -114324572067 -056235112007 023716621435 -277247320643 -047545640427 -101066467355 -004253032060 
00240 001034466434 -133402441525 031472033032 -331121077712 -052103756666 -100342223700 063233722333 067470001617 
00250 -255343213240 231401473377 001135277334 -357213523233 163117511423 -143515720007 222135133535 -277415641035 
00260 -066541120637 076562670765 033052557672 016701126152 001155012347 -006441660377 023617432223 120214400606 
00270 -142621274325 -2137450C 1527 -225363200253 -072625176542 -326547115216 -176350530731 001241667712 -276262230565 
00300 367554615474 060430641771 -011101624537 -107721063264 -053001620564 -105317755363 106053747446 -367614044661 
00310 001244103214 -013220662311 137766501655 055654457161 332460575024 335774331621 161503277666 -277743224700 
00320 -212641703337 007164242667 001245535014 -124024712514 -175440720511 -074651614757 -214234345207 -236107204230 
06330 -271545302767 005224731414 235533631606 -151571374217 001263274153 112626562243 324660174524 -114665630114 
^^ .^^ ,.,„,,. ...-, ^.-. , ^<.^^-,^^^ iLii-T-r J.UJ. I ji,i jTttojf puioo itrfPfaoDUfO -ii^S'KSoa f Uif U f (JUlJii^ 140654 -35/4 75251347 
66350 146421506277 144237525C23 234273266306 -101336352722 -040064317001 215537072151 316002230312 -247331114372 
00360 001351010117 -113075710C47 322114574574 001767167071 -245433747633 -003175234322 330412247172 -062440105051 
00370 -014012761020 -330537426751 0C1355776422 117031036572 -030306237743 264000605124 -360451301417 -366273171146 
00400 063372511460 253121323412 -276202226165 -070535642774 001402611665 236432071273 254026552255 -356014523361 
00410 114730471031 -030435231475 -143260700076 066765347014 -156603164413 144244430301 001524150054 -062475153147 
60426 -610214232474 -220561363565 216643067066 -100202301700 -124167C621 31 227467057171 -002033562133 054475425622 
00430 001546150215 -056332151720 272025163755 -144106244655 055033346060 173671005617 164146632243 372637405423 
66440 336274217707 106744535327 001572727460 161721600412 -165377722163 070300435751 -311246226715 121341641625 
66456 -006423241126 260760243736 -137724210154 277777665051 001631531257 -304255761407 -074177666336 -035063551053 
66460 -371707252243 -144313671633 376015454422 -030174527374 -124201417364 -100715147562 001745060367 -027426143015 
06470 -011754637221 100223735766 136225065502 111701210652 -134163247026 -033724163241 -310131501104 076050627764 

Figure 17. First Thirty-Two Logical Data Records of Output for Sample Run 
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Figure 18. Section of Output Tape Record Showing Location of First Input Record 
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